Nastavení výchozího zobrazení mapy

Interaktivní mapy s leaflet v R

Rich Majerus

Vice President of Strategy & Planning, Queens University of Charlotte

Geokódování v R

Běžným přístupem je funkce geocode() z balíčku ggmap
Vrací zeměpisnou šířku a délku adresy nebo názvu místa

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

Geokódování v 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

Nastavení výchozího zobrazení mapy

setView()

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

Příklad setView()

fitBounds()

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

Příklad fitBounds()

Udržení zaměření mapy

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

Reference pro Leaflet
- https://leafletjs.com/reference-1.3.0.html
- https://rstudio.github.io/leaflet/

Obnovení výchozího pohledu

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

Příklad setMaxBounds()

Pojďme procvičovat!

Interaktivní mapy s leaflet v R