CommencezCommencez gratuitement

Cartographier tous les collèges

Continuons d'empiler des couches et ajoutons les collèges à but lucratif à notre carte leaflet stockée dans l'objet m3.

Après avoir print() la carte m3 avec les collèges publics, privés et à but lucratif comme couches distinctes, essayez ensuite de retirer les trois couches, puis de les ajouter de nouveau à la carte dans un ordre différent.

Les différents secteurs de collèges sont réajoutés à la carte comme couches dans l'ordre que vous précisez (c.-à-d. le dernier secteur que vous sélectionnez sera au-dessus).

La palette de couleurs pal et la carte m3 avec les collèges publics et privés ont été chargées pour vous.

Cette activité fait partie du cours

Cartes interactives avec leaflet en R

Voir le cours

Instructions de l’exercice

  • Filtrez les données ipeds pour créer un tableau de données ne contenant que les collèges à but lucratif et assignez-le à profit.
  • Créez une carte leaflet des collèges publics, privés et à but lucratif.
  • Utilisez la fonction addLayersControl() et l'argument overlayGroups pour permettre aux utilisateurs d'activer ou de désactiver les trois secteurs de collèges.
  • Centrez la carte au milieu des États-Unis et réglez 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
Modifier et exécuter le code