Mapa 3D Población Mundial 2025

Mapa 3D de población con varios niveles de detalle

Este proyecto convierte los datos abiertos de población (WorldPop 2025) en un mapa 3D fácil de explorar. Las “columnas” se elevan donde vive más gente y bajan donde hay menos, de modo que la geografía demográfica se entiende de un vistazo.

Si tienes un poco de paciencia lo descargas directamente aquí:
https://drive.google.com/file/d/1tw69A-3Emeq469meCkAiAseEObomhQy4/view?usp=sharing

Script:

library(terra)
library(sf)
library(tmap)
library(mapgl)
library(tmap.mapgl)

tmap_mode("maplibre")
if (tmap_mode() != "maplibre") stop("Modo maplibre no configurado.")

archivo_worldpop <- "C:/Users/hugod/OneDrive - Hugo de Val Roig/Descargas/global_pop_2025_CN_1km_R2025A_UA_v1.tif"
if (!file.exists(archivo_worldpop)) {
ubicaciones <- c(
"C:/Users/hugod/Downloads/global_pop_2025_CN_1km_R2025A_UA_v1.tif",
"C:/Users/hugod/OneDrive - Hugo de Val Roig/Downloads/global_pop_2025_CN_1km_R2025A_UA_v1.tif"
)
for (u in ubicaciones) if (file.exists(u)) { archivo_worldpop <- u; break }
}
if (!file.exists(archivo_worldpop)) stop("Archivo WorldPop no encontrado.")

r0 <- rast(archivo_worldpop)
d0 <- dim(r0)

TARGET_PIXELS <- 600000L
num_pix <- function(f) prod(ceiling(d0[1:2] / f))

factor_opt <- 1L
while (num_pix(factor_opt) > TARGET_PIXELS && factor_opt < 256L) factor_opt <- factor_opt + 1L
factor_opt <- max(1L, factor_opt)

r_agg <- aggregate(r0, fact = factor_opt, fun = sum, na.rm = TRUE)
names(r_agg) <- "poblacion"

escala_fill <- tm_scale_intervals(values = "-ocean.thermal", style = "kmeans", n = 7)

m <- tm_shape(r_agg) +
tm_polygons_3d(
height = "poblacion",
fill = "poblacion",
fill.scale = escala_fill,
fill.legend = tm_legend(
title = "Población (personas)",
position = c("right", "bottom"),
orientation = "landscape"
)
)

print(m)

cat("\n--- Resumen ---\n")
cat("Factor elegido: ", factor_opt, "\n", sep = "")
cat("Celdas resultantes: ", format(prod(dim(r_agg)[1:2]), big.mark = ","), "\n", sep = "")
cat("Sugerencia: si al exportar notas lentitud, eleva 'factor_opt' o reduce 'TARGET_PIXELS'.\n")


Qué hace

Muestra la población en 3D sobre el mapa.

Te deja elegir el nivel de detalle: desde una vista rápida para todo el país hasta un zoom más fino para regiones concretas.

Prioriza la fluidez: si tu ordenador es modesto, usa un detalle medio; si es potente, prueba el máximo.

Cómo se usa (en 3 pasos)

Descarga el archivo de población de WorldPop 2025 y colócalo en tu equipo.

Indica en el script dónde está ese archivo.

Ejecuta y elige el nivel de detalle que quieras ver. Listo: aparece el mapa 3D para girar, hacer zoom y comparar zonas.

Qué puedes descubrir

Corredores urbanos y áreas metropolitanas que destacan por su altura.

Zonas rurales y espacios vacíos que quedan casi planos.

Contrastes costa–interior, valles y mesetas que condicionan dónde vivimos.

Consejos prácticos

Empieza con un detalle medio (rápido y claro).

Si necesitas más precisión, sube el detalle; si el mapa va lento, bájalo.

Para hablar de totales de población, esta visualización suma habitantes por áreas más grandes sin perder la idea global.

Para quién es

Docentes, periodistas, urbanistas, curiosos de los datos y cualquier persona que quiera contar historias con mapas sin complicarse.

Datos y créditos

Fuente: WorldPop 2025 (población a ~1 km). Revisa siempre la licencia y cita a WorldPop cuando corresponda.