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

Mapa všech vysokých škol

Přidejme další vrstvu – tentokrát ziskové vysoké školy – do naší leaflet mapy uložené v objektu m3.

Až pomocí print() zobrazíš mapu m3 s veřejnými, soukromými a ziskovými školami jako samostatnými vrstvami, zkus všechny tři vrstvy odebrat a přidat je zpět v jiném pořadí.

Jednotlivé sektory škol se do mapy přidávají jako vrstvy v tom pořadí, které zadáš – poslední vybraný sektor bude zobrazen navrchu.

Barevná paleta pal a mapa m3 s veřejnými a soukromými školami jsou už načtené.

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

Interaktivní mapy s leaflet v R

Zobrazit kurz

Pokyny k cvičení

  • Filtruj data ipeds tak, aby vznikl datový rámec obsahující pouze ziskové vysoké školy, a přiřaď ho do proměnné profit.
  • Vytvoř leaflet mapu zobrazující veřejné, soukromé i ziskové vysoké školy.
  • Pomocí funkce addLayersControl() a argumentu overlayGroups umožni uživatelům přepínat zobrazení všech tří sektorů škol.
  • Vycentruj mapu na střed USA a nastav úroveň přiblížení na 4.

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

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

# Create data frame called profit with only For-Profit colleges
___ <- filter(ipeds, sector_label == "For-Profit")  

# Add For-Profit colleges to `m3` as a new layer
m3 <- m3 %>% 
        addCircleMarkers(data = ___, radius = 2, label = ~htmlEscape(name),
                         color = ~pal(sector_label),   group = "___")  %>% 
        addLayersControl(overlayGroups = c("Public", "Private", "___"))  

# Center the map on the middle of the US with a zoom of 4
m4 <- m3 %>%
        ___(lat = 39.8282, lng = -98.5795, zoom = 4) 
        
m4
Upravit a spustit kód