```{r}
#| label: fig-bubble
#| fig-cap: "Bunch 'o bubbles"
library(plotly)
data <- read.csv("https://raw.githubusercontent.com/plotly/datasets/master/school_earnings.csv")
fig <- plot_ly(data, x = ~Women, y = ~Men, text = ~School, type = 'scatter', mode = 'markers',
marker = list(size = ~Gap, opacity = 0.5))
fig <- fig %>% layout(title = 'Gender Gap in Earnings per University',
xaxis = list(showgrid = FALSE),
yaxis = list(showgrid = FALSE))
fig
```3 Results
Get as fancy as you’d like here (see Figure 3.1) although remember that the .pdf submitted to the graduate school will not reflect/support interactivity…
Appendices of your code–chunks can be auto–generated if you like, although the fact that you’re completing your thesis/dissertation using dissertate somewhat mitigates the reasons for doing so.