Este reporte presenta mapas interactivos sencillos de las principales ciudades de México utilizando la librería Leaflet.
Los mapas interactivos permiten a los usuarios hacer zoom, desplazarse y hacer clic en elementos para obtener más información. Son ideales para explorar datos geográficos de manera dinámica.
# Crear un mapa simple centrado en México
leaflet() %>%
addTiles() %>%
setView(lng = -102.5528, lat = 23.6345, zoom = 5) %>%
addMarkers(lng = -99.1332, lat = 19.4326,
popup = "Ciudad de México - Capital")
El siguiente mapa muestra las ciudades más importantes del país con información básica en cada marcador.
# Datos de ciudades
ciudades <- data.frame(
ciudad = c("Ciudad de México", "Guadalajara", "Monterrey", "Puebla"),
lat = c(19.4326, 20.6597, 25.6866, 19.0414),
lng = c(-99.1332, -103.3496, -100.3161, -98.2063),
poblacion = c("9.2 millones", "1.4 millones", "1.1 millones", "1.7 millones")
)
# Crear el mapa
leaflet(ciudades) %>%
addTiles() %>%
setView(lng = -102.5528, lat = 23.6345, zoom = 5) %>%
addMarkers(~lng, ~lat,
popup = ~paste("<b>", ciudad, "</b><br/>",
"Población:", poblacion))
knitr::kable(ciudades,
caption = "Ciudades Principales de México",
col.names = c("Ciudad", "Latitud", "Longitud", "Población"))
| Ciudad | Latitud | Longitud | Población |
|---|---|---|---|
| Ciudad de México | 19.4326 | -99.1332 | 9.2 millones |
| Guadalajara | 20.6597 | -103.3496 | 1.4 millones |
| Monterrey | 25.6866 | -100.3161 | 1.1 millones |
| Puebla | 19.0414 | -98.2063 | 1.7 millones |
Los círculos permiten representar datos cuantitativos de manera visual en el mapa.
# Convertir población a números para los círculos
ciudades$pop_num <- c(9200000, 1400000, 1100000, 1700000)
leaflet(ciudades) %>%
addTiles() %>%
setView(lng = -102.5528, lat = 23.6345, zoom = 5) %>%
addCircleMarkers(~lng, ~lat,
radius = ~sqrt(pop_num)/5000,
color = "#8e24aa",
fillOpacity = 0.7,
popup = ~paste("<b>", ciudad, "</b><br/>",
"Población:", poblacion))
Para expandir este análisis se puede:
Reporte generado el 2025-06-27 usando R Markdown y Leaflet