Definindo a visualização padrão do mapa

Mapas Interativos com leaflet em R

Rich Majerus

Vice President of Strategy & Planning, Queens University of Charlotte

Geocodificação em R

Uma abordagem comum é usar a função geocode() do pacote ggmap
Retorna a latitude e longitude de um endereço ou nome de lugar

library(ggmap)

geocode("350 5th Ave, New York, NY 10118")

Information from URL : https://maps.googleapis.com/maps/api/geocode/...

lon       lat
-73.98575 40.74856

Geocodificação em R II

geocode(location, 
        output = c("latlon", "latlona", "more", "all"),
        source = c("google", "dsk"))

geocode("Colby College", 
        output = "more", 
        source = "google")

lon       lat      type          loctype  
-69.66264 44.56387 establishment rooftop  

address
4000 mayflower hill dr, waterville, me 04901, usa

Definindo a visualização padrão do mapa

setView()

leaflet() %>% 
 addTiles() %>% 
 setView(lng = -73.98575, 
         lat = 40.74856, 
         zoom = 13)

exemplo de setView()

fitBounds()

leaflet() %>% 
 addTiles() %>% 
 fitBounds(
  lng1 = -73.910, lat1 = 40.773, 
  lng2 = -74.060, lat2 = 40.723)

exemplo de fitBounds()

Mantendo o foco

leaflet(options = leafletOptions(dragging = FALSE,
                                 minZoom = 14, 
                                 maxZoom = 18))  %>% 
    addProviderTiles("CartoDB")  %>% 
    setView(lng = -73.98575, lat = 40.74856, zoom = 18)

Referências do Leaflet
- https://leafletjs.com/reference-1.3.0.html
- https://rstudio.github.io/leaflet/

Restaurando o foco

leaflet()  %>% 
     addTiles()  %>% 
     setView(lng = -73.98575, lat = 40.74856, zoom = 18) %>% 
     setMaxBounds(lng1 = -73.98575, lat1 = 40.74856, 
                  lng2 = -73.98575, lat2 = 40.74856)

exemplo de setMaxBounds()

Vamos praticar!

Mapas Interativos com leaflet em R