Cartografierea colegiilor publice și private
Putem adăuga colegiile private exact cum am adăugat colegiile publice. Apoi, folosind funcția addLayersControl() cu argumentul overlayGroups, le oferim utilizatorilor posibilitatea de a afișa colegiile publice și/sau private. Argumentul overlayGroups primește un vector cu grupurile pe care le-am definit la crearea straturilor (adică public și privat). Ca referință, iată cum putem adăuga colegiile publice pe hartă ca strat:
# 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"))
Biblioteca htmltools, paleta de culori pal și harta m3 cu colegiile publice au fost deja încărcate pentru tine.
Acest exercițiu face parte din cursul
Hărți interactive cu leaflet în R
Instrucțiuni pentru exercițiu
- Filtrează datele din ipeds pentru a crea un cadru de date cu doar colegiile private.
- Adaugă colegiile private în
m3ca un strat nou. - Folosește funcția
addLayersControl()cu argumentuloverlayGroupspentru a permite utilizatorilor să comute între straturile public și privat.
Exercițiu interactiv practic
Încearcă acest exercițiu completând acest cod de exemplu.
# 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