Začněte nyníZačněte zdarma

Přidávání vyskakovacích oken a uložení mapy

Aby byla mapa přehlednější, můžeme přidat vyskakovací okna (popupy). Pokud chceme, aby se popup zobrazil po kliknutí na značku, musíme zadat argument popup ve funkci addMarkers(). Hotovou mapu pak můžeme uložit do objektu – a ten pak pomocí pipe předávat dalším funkcím, které mapu upraví nebo doplní o další vrstvy.

dc_nyc <- 
    leaflet() %>% 
        addTiles() %>% 
        addMarkers(lng = -73.98575, lat = 40.74856, 
                   popup = "DataCamp - NYC") 

dc_nyc %>% 
    setView(lng = -73.98575, lat = 40.74856, 
            zoom = 2)

Zkusíme teď přidat popupy k oběma značkám poboček DataCampu a mapu uložíme do objektu.

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

Interaktivní mapy s leaflet v R

Zobrazit kurz

Pokyny k cvičení

  • Přidej argument popup do funkce addMarkers(), aby se zobrazovala hodnota ze sloupce hq, a ulož mapu leaflet do objektu s názvem map.
  • Nastav zobrazení map tak, aby bylo vycentrováno na belgické ústředí s úrovní přiblížení 5, a výsledek ulož do map_zoom.
  • Vypiš objekt map_zoom.

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

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

# Store leaflet hq map in an object called map
 ___ <- leaflet() %>%
          addProviderTiles("CartoDB") %>%
          # Use dc_hq to add the hq column as popups
          addMarkers(lng = dc_hq$lon, lat = dc_hq$lat,
                     popup = ___$___)

# Center the view of map on the Belgium HQ with a zoom of 5 
map_zoom <- ___ %>%
      setView(lat = 50.881363, lng = 4.717863,
              zoom = ___)

# Print map_zoom
___
Upravit a spustit kód