Tvorba první leaflet mapy

Viděl/a jsi, jak lze leaflet mapy vytvářet jako kolekci různých vrstev.

Existují také další nastavení, která uživatelům umožňují vybírat konkrétní vrstvy a poskytovatele map.

V tomto cvičení si vytvoříš vlastní leaflet mapu s různými funkcemi.

K dispozici máš čtyři sf objekty uložené jako:

london_poly
london_loop
london_capital
listings_geo

Atribut geometrie každého sf objektu si můžeš prohlédnout pomocí notace $geometry.

Knihovny sf, tidyverse a leaflet jsou již načteny.

Toto cvičení je součástí kurzu

Tvorba dashboardů pomocí shinydashboard

Zobrazit kurz

Pokyny k cvičení

Přidej dalšího poskytovatele Esri.WorldStreetMap.
Přidej červené polygony.
Doplň funkci addLayersControl() tak, aby uživatel mohl vybírat různé překryvné skupiny a vrstvy — přidej je v pořadí, ve kterém se v kódu objevují.

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

leaflet(london_poly) %>% 
  addTiles(group="Default") %>%  
  addProviderTiles(providers$Stamen.Toner, group = "Toner") %>%
  # Add another provider called Esri.WorldStreetMap
  ___(___, group = "World street map") %>%
  # Add red polygons 
  ___(group = "Ward", col=___, label=~as.character(Name)) %>% 
  addPolylines(loop_geo[,1], loop_geo[,2], group = "London loop") %>%
  addPolylines(capital_geo[,1], capital_geo[,2],
               group = "Capital ring", color = "orange") %>%
    addMarkers(data = listings_geo,
             group = "Listings", clusterOptions = markerClusterOptions()) %>% 
  # Set up to allow user selection of different overlay groups and layers
  ___

Upravit a spustit kód