# NOT RUN {
viewExtent(poppendorf)
viewExtent(breweries)
viewExtent(franconia) + breweries
viewExtent(trails) + trails + breweries
leaflet() %>% addProviderTiles("OpenStreetMap") %>% addExtent(breweries)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab