CommencezCommencez gratuitement

Créer votre première carte leaflet

Vous avez vu comment les cartes leaflet peuvent être créées comme un ensemble de différentes couches.

Il existe aussi d'autres paramètres qui permettent aux utilisateurs de sélectionner des couches précises et des fournisseurs de cartes.

Dans cet exercice, vous allez créer votre propre carte leaflet avec diverses fonctionnalités.

Quatre objets sf sont stockés ici :

  • london_poly
  • london_loop
  • london_capital
  • listings_geo

Vous pouvez consulter l'attribut geometry de chaque objet sf à l'aide de la notation $geometry.

Les bibliothèques sf, tidyverse et leaflet ont été chargées.

Cette activité fait partie du cours

Créer des tableaux de bord avec shinydashboard

Voir le cours

Instructions de l’exercice

  • Ajoutez un autre fournisseur nommé Esri.WorldStreetMap.
  • Ajoutez des polygones rouges.
  • Complétez addLayersControl() afin que l'utilisateur puisse sélectionner différents groupes et couches de superposition, en les ajoutant dans leur ordre d'apparition.

Exercice interactif pratique

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

leaflet(london_poly) %>% 
  addTiles(group="Default") %>%  
  addProviderTiles(providers$Stamen.Toner, group = "Toner") %>%
  # Add another provider called Esri.WorldStreetMap
  ___(___, group = "World street map") %>%
  # Add red polygons 
  ___(group = "Ward", col=___, label=~as.character(Name)) %>% 
  addPolylines(loop_geo[,1], loop_geo[,2], group = "London loop") %>%
  addPolylines(capital_geo[,1], capital_geo[,2],
               group = "Capital ring", color = "orange") %>%
    addMarkers(data = listings_geo,
             group = "Listings", clusterOptions = markerClusterOptions()) %>% 
  # Set up to allow user selection of different overlay groups and layers
  ___
Modifier et exécuter le code