The Australian gender wage gap: interactive viz

A little more dataviz

ggplot2
wage-gap
Author

Philip Khor

Published

June 9, 2019

I wrote a piece at The Ambitious Economist on Australia’s gender wage gap with some good ol’ ggplot2 dataviz. However, there was a chart showing the gender wage gap by occupation that could have benefited from some interactive visualisation. Fortunately, the R package plotly makes this quite simple, with just two more lines of code …

library(plotly)
ggplotly(p, tooltip = c("female_pct_male", "occupation")) %>% 
  layout(showlegend = FALSE) %>% 
  config(displayModeBar = FALSE) -> p1
p1