Interactive Shiny App

[bharath03-a]

Initial ideas:

• When clicked on a specific state on the choropleth map we can show the scatter plot of the crashes in that specific state.
• When clicked on a category in a bar plot we can show the time series of that specific category.

[Gchism94]

Both are possible with a work-around. You would have to create images (probably .svgs or high-quality .pngs) for every plot you want in the tool-tip. You would then embed the image into the tooltip:

ggplotly(p, tooltip = c("state", "value", "image_url")) %>%
  layout(hoverlabel = list(align = "left"),
         hovermode = 'closest')