Crea tu primer mapa con leaflet
Has visto cómo los mapas de leaflet pueden crearse como una colección de capas diferentes.
También hay otros ajustes que permiten a los usuarios seleccionar capas específicas y proveedores de mapas.
En este ejercicio, crearás tu propio mapa con leaflet con varias funcionalidades.
Hay cuatro objetos sf almacenados como:
london_polylondon_looplondon_capitallistings_geo
Puedes consultar el atributo de geometría de cada objeto sf con la notación $geometry.
Las librerías sf, tidyverse y leaflet ya se han cargado.
Este ejercicio forma parte del curso
Creación de paneles con shinydashboard
Instrucciones del ejercicio
- Añade otro proveedor llamado
Esri.WorldStreetMap. - Añade polígonos rojos.
- Completa
addLayersControl()para que el usuario pueda seleccionar diferentes grupos y capas superpuestas, añadiéndolos en su orden de aparición.
ejercicio interactivo práctico
Prueba este ejercicio completando este código de ejemplo.
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
___