Cartographier tous les établissements
Continuons à empiler les couches et ajoutons les établissements à but lucratif à notre carte leaflet stockée dans l'objet m3.
Après avoir print() la carte m3 avec les établissements publics, privés et à but lucratif chacun dans leur propre couche, essayez ensuite de supprimer les trois couches, puis de les réajouter à la carte dans un ordre différent.
Les différents secteurs d'établissements sont réajoutés à la carte en tant que couches dans l'ordre que vous indiquez (c'est-à-dire que le dernier secteur sélectionné sera au-dessus).
La palette de couleurs pal et la carte m3 avec les établissements publics et privés ont été chargées pour vous.
Cet exercice fait partie du cours
<cours>Cartes interactives avec leaflet en R</cours>Instructions de l’exercice
- Filtrez les données ipeds pour créer un data frame ne contenant que les établissements à but lucratif et affectez-le à
profit. - Créez une carte
leafletdes établissements publics, privés et à but lucratif. - Utilisez la fonction
addLayersControl()et l'argumentoverlayGroupspour permettre aux utilisateurs d'afficher/masquer les trois secteurs d'établissements. - Centrez la carte sur le centre des États-Unis et définissez le niveau de zoom à 4.
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
# 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