CommencerCommencez gratuitement

Créer votre première carte leaflet

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

Il existe aussi d’autres paramètres qui permettent aux utilisateurs de sélectionner des couches spécifiques et des fournisseurs de tuiles.

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 de géométrie de chaque objet sf avec la notation $geometry.

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

Cet exercice fait partie du cours

<cours>Créer des tableaux de bord avec shinydashboard</cours>
Voir le cours

Instructions de l’exercice

  • Ajoutez un autre fournisseur appelé Esri.WorldStreetMap.
  • Ajoutez des polygones rouges.
  • Complétez addLayersControl() afin que différentes superpositions et couches puissent être sélectionnées par l’utilisateur, 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