CommencerCommencez gratuitement

Options de addPolygon()

Jusqu'ici, nous avons utilisé l'apparence par défaut de addPolygons(). Il existe plusieurs autres façons de personnaliser les polygones.

Les arguments de addPolygons() sur lesquels nous allons nous concentrer sont :

  • weight : l'épaisseur des lignes de contour en pixels
  • color : la couleur des polygones
  • label : les informations affichées au survol
  • highlightOptions : les options pour mettre en évidence un polygone au survol
addPolygons(weight = 2,
           color = "red",
           label = ~paste0("Total Income: ", dollar(income)),
           highlight = highlightOptions(weight = 10,
                                       color = "blue",
                                       bringToFront = TRUE))

Le SpatialPolygonsDataFrame high_inc que vous avez créé dans l'exercice précédent a été chargé pour vous.

Cet exercice fait partie du cours

<cours>Cartes interactives avec leaflet en R</cours>
Voir le cours

Instructions de l’exercice

  • Utilisez les arguments de addPolygons() pour cartographier les codes postaux à hauts revenus en Caroline du Nord avec :
    • une épaisseur de contour de 1 pixel,
    • des polygones colorés avec la palette nc_pal et mis en évidence au survol, et
    • des labels qui affichent les mots "Mean Income:" suivis du revenu moyen du code postal.

Exercice interactif pratique

Essayez cet exercice en complétant ce code d’exemple.

# create color palette with colorNumeric()
nc_pal <- colorNumeric("YlGn", domain = high_inc@data$mean_income)

high_inc %>%
  leaflet() %>%
  addTiles() %>%
  # set boundary thickness to 1 and color polygons
  addPolygons(___ = ___, ___ = ~nc_pal(mean_income),
              # add labels that display mean income
              label = ___("Mean Income: ", dollar(mean_income)),
              # highlight polygons on hover
              ___ = highlightOptions(weight = 5, color = "white",
              bringToFront = TRUE))
Modifier et exécuter le code