Créer une palette de couleurs avec colorFactor
Jusqu'ici, nous avons seulement utilisé la couleur pour personnaliser le style de notre carte. Avec colorFactor(), nous pouvons créer une palette qui associe des couleurs aux niveaux d'une variable factorielle.
pal <-
colorFactor(palette = c("blue", "red", "green"),
levels = c("Public", "Private", "For-Profit"))
m %>%
addCircleMarkers(color = ~pal(sector_label))
Pourquoi pourrait-on éviter d'utiliser cette palette de couleurs en particulier?
Si vous souhaitez colorer une carte à partir d'une variable continue, voyez colorNumeric().
pal <- colorNumeric(palette = "RdBu", domain = c(25:50))
ipeds %>%
leaflet() %>%
addProviderTiles("CartoDB") %>%
addCircleMarkers(radius = 2, color = ~pal(lat))
Cette activité fait partie du cours
Cartes interactives avec leaflet en R
Instructions de l’exercice
- Créez une palette de couleurs nommée
palpour les valeurs desector_labelaveccolorFactor()en utilisant « red », « blue » et « #9b4a11 ». - Ajoutez des marqueurs circulaires qui colorent les collèges à l'aide de
pal()et des valeurs desector_label.
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
# Make a color palette called pal for the values of `sector_label` using `colorFactor()`
# Colors should be: "red", "blue", and "#9b4a11" for "Public", "Private", and "For-Profit" colleges, respectively
pal <- ___(palette = c("red", "blue", ___),
levels = c("Public", "Private", "For-Profit"))
# Add circle markers that color colleges using pal() and the values of sector_label
map2 <-
map %>%
addCircleMarkers(data = ca, radius = 2,
color = ~pal(sector_label),
label = ~paste0(name, " (", sector_label, ")"))
# Print map2
map2