Cartographier les universités publiques
Nous pouvons ajouter chaque secteur à notre carte sous forme de couche, afin de permettre aux utilisateurs de sélectionner les secteurs affichés. Pour cela, nous allons utiliser un nouvel argument de la fonction addCircleMarkers(), appelé group.
leaflet() %>%
addProviderTiles("CartoDB") %>%
addCircleMarkers(data = public,
label = ~htmlEscape(name),
group = "Public")
Nous allons intégrer une autre fonctionnalité issue de la bibliothèque htmltools. En enveloppant nos libellés avec la fonction htmlEscape(), nous neutralisons les caractères susceptibles d'être interprétés comme du HTML. Cela évite que certains noms d'universités n'apparaissent avec une mise en forme non désirée.
La palette de couleurs pal créée au chapitre 2 a été chargée pour vous.
Cet exercice fait partie du cours
<cours>Cartes interactives avec leaflet en R</cours>Instructions de l’exercice
- Chargez le package
htmltools. - Filtrez les données
ipedspour créer un data frame ne contenant que les universités publiques. - Créez une carte
leafletdes universités publiques. - Ajoutez l'argument
groupàaddCircleMarkers().
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
# Load the htmltools package
___
# Create data frame called public with only public colleges
public <- ___(ipeds, sector_label == "Public")
# Create a leaflet map of public colleges called m3
m3 <- leaflet() %>%
addProviderTiles("CartoDB") %>%
addCircleMarkers(data = ___, radius = 2, label = ~htmlEscape(name),
color = ~pal(sector_label), ___ = "Public")
m3