Kartlägg alla högskolor
Nu fortsätter vi att lägga till lager – den här gången lägger vi till vinstdrivande högskolor på leaflet-kartan som är lagrad i objektet m3.
När du har kört print() på m3-kartan med offentliga, privata och vinstdrivande högskolor som egna lager, kan du prova att ta bort alla tre lagren och lägga tillbaka dem på kartan i en annan ordning.
Högskolesektorerna läggs tillbaka på kartan som lager i den ordning du anger, det vill säga att den sektor du väljer sist hamnar överst.
Färgpaletten pal och m3-kartan med offentliga och privata högskolor har redan lästs in åt dig.
Den här övningen är en del av kursen
Interaktiva kartor med leaflet i R
Övningsinstruktioner
- Filtrera ipeds-datan för att skapa en dataram med enbart vinstdrivande högskolor och tilldela den till
profit. - Skapa en
leaflet-karta över offentliga, privata och vinstdrivande högskolor. - Använd funktionen
addLayersControl()och argumentetoverlayGroupsför att ge användarna möjlighet att toggla mellan alla tre högskolesektorer. - Centrera kartan över mitten av USA och sätt zoomnivån till 4.
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
# 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