# NOT RUN {
library(leaflet)
leaflet() %>% addProviderTiles("OpenStreetMap") %>% addCircleMarkers(data = breweries)
leaflet() %>% addProviderTiles("OpenStreetMap") %>% addFeatures(data = breweries)
leaflet() %>% addProviderTiles("OpenStreetMap") %>% addPolylines(data = atlStorms2005)
leaflet() %>% addProviderTiles("OpenStreetMap") %>% addFeatures(atlStorms2005)
leaflet() %>% addProviderTiles("OpenStreetMap") %>% addPolygons(data = franconia)
leaflet() %>% addProviderTiles("OpenStreetMap") %>% addFeatures(franconia)
# }
Run the code above in your browser using DataLab