library(tidyverse)
library(ggiraph)
usmapdata::us_map() |>
ggplot() +
aes(fill = as.numeric(fips),
tooltip = full ) +
geom_sf_interactive()
girafe(ggobj = last_plot())
usmapdata::us_map() |>
ggplot() +
aes(fill = as.numeric(fips),
tooltip = full ) +
geom_sf_interactive()
girafe(ggobj = last_plot())