## Not run: ------------------------------------
# library(tigris)
# library(leaflet)
#
# states <- states(detailed=FALSE)
#
# leaflet(states) %>%
# addProviderTiles("CartoDB.Positron") %>%
# addPolygons(fillColor = "white",
# color = "black",
# weight = 0.5) %>%
# setView(-98.5795, 39.8282, zoom=3)
## ---------------------------------------------
Run the code above in your browser using DataLab