7.4 Heatmap

Finalmente construiremos un heatmap con los datos de la población de Quintana Roo por edades en los municipios para observar su agrupamiento

pob_ent <- poblacion %>%
  filter(nom_ent == "Quintana Roo") %>%
  select(nom_mun, pob0_14, pob15_64, pob65_mas) 

pob_ent_matrix <- pob_ent %>% 
  select(-nom_mun) %>%
  as.matrix()
rownames(pob_ent_matrix) <- pob_ent$nom_mun
colnames(pob_ent_matrix) <- c("Menores de 15", "De 15 a 65", "Mayores de 65")
pheatmap::pheatmap(pob_ent_matrix)