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

Mapování veřejných a soukromých vysokých škol

Soukromé vysoké školy přidáme stejným způsobem jako veřejné. Pomocí funkce addLayersControl() s argumentem overlayGroups pak uživatelům umožníme zobrazit veřejné a/nebo soukromé školy. Argument overlayGroups přijímá vektor skupin, které jsme definovali při vytváření vrstev (tj. veřejné a soukromé). Jako připomínka: takto přidáme veřejné vysoké školy do mapy jako vrstvu:

# Create data frame called public with only public colleges
public <- filter(ipeds, sector_label == "Public")  

# Add public colleges as a layer and save map as `m3`
m3 <- leaflet() %>% 
        addProviderTiles("CartoDB") %>% 
        addCircleMarkers(data = public, radius = 2, 
                         label = ~htmlEscape(name),
                         color = ~pal(sector_label),
                         group = "Public") %>% 
        addLayersControl(overlayGroups = c("Public"))

Knihovna htmltools, barevná paleta pal a mapa m3 s veřejnými vysokými školami jsou už načteny.

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

Interaktivní mapy s leaflet v R

Zobrazit kurz

Pokyny k cvičení

  • Filtruj data ipeds a vytvoř datový rámec obsahující pouze soukromé vysoké školy.
  • Přidej soukromé vysoké školy do m3 jako novou vrstvu.
  • Pomocí funkce addLayersControl() a argumentu overlayGroups umožni uživatelům přepínat mezi vrstvami veřejných a soukromých škol.

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 private with only private colleges
private <- filter(ipeds, sector_label == "___")  

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

m3
Upravit a spustit kód