Municipios españoles con dos nombres

· 2308 words · 11 minute read
municipios
data munging

Nuevo post. Voy a hacer un gráfico con los municipios españoles que tienen dos nombres oficiales, por ejemplo: Alicante/Alacant.

Que ¿por qué? pues resulta que estaba tratando de recordar cómo se hacen mapas en R y vi este post de Suzan Baert. Suzan es belga y en Bélgica hay muchas localidades con 2 nombres, por ejemplo Liège/Luik en French y en Dutch respectivamente, y resulta que … , con sus palabras:

Two week ago, I heard again a story from foreigners who got very confused, and I realized I have no idea how many towns/cities we have like this. Sounds like a perfect time to play around with tmap and leaflet!

A mi me pasa lo mismo, no sé cuantos municipios españoles tienen 2 nombres y cuando vi el post justamente estaba jugando con los ficheros del INE, así que perfect time! Aún no me he leído su post, pero creo que la única diferencia es que como mi objetivo es aprender sobre mapas voy a intentar hacerlo con el package sf. Vamos allá!!

Lo primero cargar las librerías

#devtools::install_github("perezp44/mypkgDataforblog")
library(mypkgDataforblog) #- personal pkg
library(stringr)
library(tidyverse)
library(kableExtra)


Los datos

Los datos con los nombres oficiales de los municipios son del INE. Los bajé hace unos 3-4 meses y son datos a 1 de enero de 2016, ahora hay un nuevo fichero (es un fichero .xlsx) pero al intentar abrirlo (tanto desde R como desde Excel) me da errores, así que sigo con el fichero antiguo, no es un post tan serio!! , pero si quieres probar a descargarlo tu, puedes hacerlo así:

url <- "http://www.ine.es/daco/daco42/codmun/codmun17/17codmun.xlsx"
download.file(url, destfile = "./datos/cod_2_municipios.xlsx")
df  <- read_excel("./datos/cod_2_municipios.xlsx")

Los datos los cargo desde el package mypkgDataforblog. Es un paquete creado por mi precisamente para facilitarme la utilización de datos en este blog. Sencillamente contiene un conjunto de datos y así los utilizo en el blog más fácilmente. Por ejemplo:

df <- cod_INE_muni_pjp

En el fichero cod_INE_muni_pjp hay 8125 municipios. Los municipios con dos nombres oficiales se pueden identificar por que los 2 nombres aparecen separados por el carácter /, por ejemplo: Alicante/Alacant.

Manipulación de datos

En el fichero aparecen los dos nombres juntos en una misma columna (NombreMuni) así que hay que separarlos:

df <- df %>% mutate(NOMBRE_tmp = NombreMuni) %>% 
  separate(NOMBRE_tmp, into = c("name_1", "name_2"), sep = "/")  %>% 
  mutate(yes_2_names = if_else(is.na(name_2), 0.0, 1.0)) %>% 
  select(INECodMuni, NombreMuni, yes_2_names, name_1, name_2, NombreCCAA, everything())

Ok, ya está. Solo queda contar cuantos municipios tienen dos nombres y en que provincia/CC.AA. están. Primero por CC.AA. Vamos a ello:

aa <- df %>% group_by(NombreCCAA) %>% 
  summarise(Municipios = n(), Muni_2_nombres = sum(yes_2_names), percent = Muni_2_nombres/Municipios) %>% 
  filter(Muni_2_nombres != 0) %>% 
  arrange(desc(percent))

Hagamos el cuadro:

library(knitr)
aa %>% kable("html", digits = 2, caption = "Cuadro 1: Municipios españoles con dos nombres oficiales (por CC.AA.)") %>% kable_styling(bootstrap_options = c("striped", "hover", "condensed", "responsive"))
Table 1: Cuadro 1: Municipios españoles con dos nombres oficiales (por CC.AA.)
NombreCCAA Municipios Muni_2_nombres percent
Navarra, Comunidad Foral de 272 64 0.24
País Vasco 251 22 0.09
Comunitat Valenciana 542 33 0.06

En total hay 119 municipios con dos nombres. Como en el listado que manejo hay 8.125 municipios esto supone tan sólo el 1,46%, digo tan sólo porque en Bélgica son un 16%. La mayoría de ellos están en Navarra, concretamente 64. Con mucha diferencia Navarra es, con un 23,5%, la Comunidad con mayor porcentaje de municipios con 2 nombres.

Hagámoslo por provincias:

aa <- df %>% group_by(NombreProv) %>% 
  summarise(Municipios = n(), Muni_2_nombres = sum(yes_2_names), percent = Muni_2_nombres/Municipios) %>% 
  filter(Muni_2_nombres != 0) %>% 
  arrange(desc(percent))

#- tabla simple
aa %>% kable("html", digits = 2, caption = "Cuadro 2: Municipios españoles con dos nombres oficiales (por provincia)") %>%
  kable_styling(bootstrap_options = c("striped", "hover", "condensed", "responsive"))
Table 2: Cuadro 2: Municipios españoles con dos nombres oficiales (por provincia)
NombreProv Municipios Muni_2_nombres percent
Araba/Álava 51 18 0.35
Navarra 272 64 0.24
Alicante/Alacant 141 14 0.10
Castellón/Castelló 135 13 0.10
Gipuzkoa 88 2 0.02
Valencia/València 266 6 0.02
Bizkaia 112 2 0.02

La verdad es que por provincias los resultados “cambian”, incluso hay cuatro provincias con 2 nombres oficiales. Araba/Álava es la provincia con mayor porcentaje (35%) de municipios con dos nombres oficiales: 18 municipios de 51. Después haré un gráfico.


Para el que tenga curiosidad en ver exactamente que municipios son los que tienen dos nombres, voy a hacer una datatable:

aa <- df %>% filter(yes_2_names != 0) %>% 
  select(NombreMuni, NombreProv, NombreCCAA)

library(DT)
DT_1 <- datatable(aa, caption = "Cuadro 3: Municipios con dos nombres oficiales",extensions = 'Scroller', options = list( pageLength = 10, deferRender = TRUE,scrollY = 400,scroller = TRUE), rownames = F, filter = "top",  fillContainer = T )

La datatable no se muestra. Es un problema que no acabo de entender del todo, pero parece que lo que pasa es que blogdown tiene un problema con los htmlwidgets si el hugo-theme usa las mismas librerias de javascipt 1 . Así que no me queda más remedio que hacerlo a capón: grabar el objeto como un htmlwidget, copiarlo en la carpera /static/ y cargarlo como un iframe (massa para mi). A ver si sale:

library(htmlwidgets)
library(htmltools)
#saveWidget(DT_1, "C://Users/perezp/Desktop/DT_1.html")
#<iframe seamless src="/posts/2018/2018_01_20_municipios_2_nombres/DT_1.html" width="100%" height="500"></iframe>


Sí, si que se muestra la datatable, no tan bonita como si se hiciera directamente … pero bueno.


Ya debería estar PERO …

Bueno, pues ya debería estar, faltarían los mapas, PERO … las cosas no son tan sencillas en España. Hay un pequeño lío!!! Resulta que lo que he hecho arriba es correcto: en España hay 119 municipios con 2 nombres oficiales, pero resulta que también hay municipios que aunque sólo tienen un nombre oficial, este único nombre oficial incluye el nombre del municipio en 2 idiomas. Se entiende mejor con un ejemplo: el municipio con código 07032 tiene nombre oficial Maó-Mahón. Según la Wikipedia en castellano:

Mahón (en catalán, Maó, oficialmente desde 2012, Maó-Mahón, la pronunciación local es Mó) es una ciudad situada en el este de la isla de Menorca (Baleares, España).

Según la Viquipedia, o wikipedia en catalán:

Maó (oficialment Maó-Mahón) és un municipi i ciutat de l’illa de Menorca, situat a l’est de l’illa i actual seu del Consell Insular de Menorca.

Bien, Maó-Mahón, da la casualidad de que es el único municipio de Baleares con 2 nombres oficiales, bueno, con un único nombre oficial pero que incluye el nombre en catalán y castellano.

Bueno, nos/me toca repetir el análisis, ahora incorporando los municipios como Maó-Mahón


Repetimos para incluir a los municipios como Maó-Mahón

Pues lo dicho a incorporar los municipios con un nombre oficial, pero que ese nombre tenga el nombre en dos lenguas:

df <- cod_INE_muni_pjp
df_2 <- df %>% mutate(NOMBRE_tmp = NombreMuni) %>% 
   filter(str_detect(NombreMuni, "-"))

Bueno, hay 113 pueblos que en su nombre oficial aparece el carácter -; PERO no es tan fácil porque resulta que hay municipios que tienen un nombre compuesto; por ejemplo: Casas-Ibañez o Vélez-Rubio. Estos, obviamente, hay que quitarlos. El problema es que hay que quitarlos usando la inspección visual/juicio experto, eso sí, ayudándome de R.

A mi buen entender sólo hay municipios con “2 nombres” en las siguientes comunidades: Navarra, País Vasco, Comunitat Valenciana y un único municipio en Baleares (Maó-Mahón), en el resto de CC.AA. en los que parece - en el nombre de un municipio es porque ese municipio tiene un nombre compuesto.

Pero aún se complican un poco más las cosas:

Pero aún se complican un poco más las cosas, porque:

  • En el caso de Navarra y País Vasco considero que los municipios en los que parece - es porque sí que tienen 2 nombres (para ser exactos un único nombre oficial, pero compuesto por el “nombre” en 2 lenguas); en realidad es fácil que tambien haya algun municipio con nombre compuesto, pero como no se euskera pues lo dejo correr y considero que son “nombres con doble nombre”. He mirado algunos de ellos en la Wikipedia y en esos casos estaba en lo cierto, pero no lo he hecho con todos 2. Disculpas!!

  • PERO, en la Comunitat Valenciana, los dos municipios en los que parece -, aparece porque tienen un nombre compuesto: Vila-real, Riba-roja de Túria

  • Y ya para decirlo todo, hay un municipio en Navarra: Oroz-Betelu/Orotz-Betelu que como veis tiene dos nombres oficiales y cada nombre oficial es compuesto.

No le doy más vueltas, ya no me estoy divirtiendo!!, pero vamos a acabar la faena.

Vamos a filtrarlos:

df <- cod_INE_muni_pjp
#-----selecciono municipios con con "/" y/o "-" en Nombre Muni
df_2 <- df %>% mutate(NOMBRE_tmp = NombreMuni) %>% 
       filter(str_detect(NombreMuni, "(-|/)"))   #- 231 pueblos 
#-----selecciono municipios con "/" y "-" en las CC.AA. oportunas
CCAA_in <- c("País Vasco", "Navarra, Comunidad Foral de", "Comunitat Valenciana", "Balears, Illes")
CCAA_in <- c("16", "15", "10", "04")
df_2 <- df_2 %>% filter(INECodCCAA %in% CCAA_in)  #- 151
#---- quito los municipios valencianos con nombre compuesto
df_2 <- df_2 %>% filter(!(INECodCCAA == "10" & str_detect(NombreMuni, "-")))  #- 149

Creo que está todo correcto. Finalmente son 149 municipios con “2 nombres”; antes eran 119. Veamos los nuevos resultados por CC.AA. y provincias.

muni_in <- as.vector(df_2$INECodMuni)
aa <- df %>% group_by(NombreCCAA) %>% 
       mutate(yes_2_names = if_else(INECodMuni %in% muni_in, 1,0)) %>% 
       summarise(Municipios = n(), Muni_2_nombres = sum(yes_2_names), percent = Muni_2_nombres/Municipios) %>%        filter(Muni_2_nombres != 0) %>% 
       arrange(desc(percent))

aa %>% kable("html", digits = 2, caption = "Cuadro 1a: Municipios españoles con \"dos nombres\" oficiales (por CC.AA.)") %>%
  kable_styling(bootstrap_options = c("striped", "hover", "condensed", "responsive"))
Table 3: Cuadro 1a: Municipios españoles con “dos nombres” oficiales (por CC.AA.)
NombreCCAA Municipios Muni_2_nombres percent
Navarra, Comunidad Foral de 272 70 0.26
País Vasco 251 45 0.18
Comunitat Valenciana 542 33 0.06
Balears, Illes 67 1 0.01


Comparando los cuadros 1 y 1a vemos que los resultados cambian “un poco”. Lo más evidente es que ahora aparece una cuarta comunidad autónoma: Illes Balears (por Maó-Mahón). La Comunitat Valenciana se queda igual. En la Comunidad Foral de Navarra aparecen 6 municipios nuevos. Los cambios más importantes se dan en País Vasco, donde se suman 23 municipios y el porcentaje sube del 8,7% al 17,9%.


Por provincias:

muni_in <- df_2$INECodMuni
aa <- df %>% group_by(NombreProv) %>% 
       mutate(yes_2_names = if_else(INECodMuni %in% muni_in, 1,0)) %>% 
       summarise(Municipios = n(), Muni_2_nombres = sum(yes_2_names), percent = Muni_2_nombres/Municipios) %>%        filter(Muni_2_nombres != 0) %>% 
       arrange(desc(percent))

aa %>% kable("html", digits = 2, caption = "Cuadro 2a: Municipios españoles con \"dos nombres\" oficiales (por provincias)") %>%
  kable_styling(bootstrap_options = c("striped", "hover", "condensed", "responsive"))
Table 4: Cuadro 2a: Municipios españoles con “dos nombres” oficiales (por provincias)
NombreProv Municipios Muni_2_nombres percent
Araba/Álava 51 25 0.49
Navarra 272 70 0.26
Bizkaia 112 13 0.12
Alicante/Alacant 141 14 0.10
Castellón/Castelló 135 13 0.10
Gipuzkoa 88 7 0.08
Valencia/València 266 6 0.02
Balears, Illes 67 1 0.01

La provincia española con mayor porcentaje de municipios con “2 nombres” sigue siendo Araba/Álava, acercándose al 50%.


Para finalizar una tabla con los 31 nuevos municipios con 2 nombres que han aparecido con el nuevo criterio. Primero hay que filtrarlos:

df <- cod_INE_muni_pjp
#-----selecciono municipios con con  "-" en Nombre Muni
df_2 <- df %>% mutate(NOMBRE_tmp = NombreMuni) %>% 
       filter(str_detect(NombreMuni, "-"))   #- 113 pueblos 
#-----selecciono municipios con "-" en las CC.AA. oportunas
CCAA_in <- c("País Vasco", "Navarra, Comunidad Foral de", "Comunitat Valenciana", "Balears, Illes")
CCAA_in <- c("16", "15", "10", "04")
df_2 <- df_2 %>% filter(INECodCCAA %in% CCAA_in)  #- 33
#---- quito los municipios valencianos con nombre compuesto
df_2 <- df_2 %>% filter(!(INECodCCAA == "10" & str_detect(NombreMuni, "-")))  #- 31

La tabla:

aa <- df_2 %>% select(NombreMuni, NombreProv, NombreCCAA)
DT_2 <- datatable(aa, caption = "Cuadro 3a: (nuevos) Municipios con \"dos nombres oficiales\"",extensions = 'Scroller', options = list( pageLength = 10, deferRender = TRUE,scrollY = 400,scroller = TRUE), rownames = F, filter = "top" )

Otra vez no sale, asi que la grabo en DT_2:

library(htmlwidgets)
library(htmltools)
#saveWidget(DT_2, "C://Users/perezp/Desktop/DT_2.html")
#<iframe seamless src="/posts/2018/2018_01_21_mapas_muni_2_nombres/DT_2.html" width="100%" height="500"></iframe>


Se acabo!!! Faltan los mapas, pero para otro día/post. Me están entrando ganas de ver que provincia/CC.AA. española tiene mas municipios con nombre compuesto; por lo que he ido viendo al hacer el post apostaría por una de las dos Castillas, casi por Castilla-La Mancha, pero me resisto a la tentación.


PD: La verdad es que el post de Suzan Baert estaba más mejor. Hacía unos mapas muy chulos y además intentaba buscar una explicación, o agrupar los municipios con doble nombre. La explicación más obvia es que hay más municipios de este tipo cerca de la frontera entre Flandes y Valonia, pero hay otras.

En mi caso, he evitado hacer comentarios/especulaciones sobre motivos por los que aparecen las dobles denominaciones. El nombre de los pueblos es algo importante para los lugareños: lo dice uno de Pancrudo, un pueblo de Teruel al que muchos denominan “Panduro”. Nos hace mucha gracia!!! 💥 😄.

Agur

  1. Esto no acabo de entenderlo del todo pero no sólo me pasa a mi, le pasa a muuucha gente, por ejemplo aquí. Ya hay un package que parece que es la solución pero no me ha funcionado (supongo que no habré sabido). Ya probaré más adelante!!).↩

  2. A los 30 minutos de dar por cerrado el post ya he encontrado tres municipios que contienen - en su nombre porque es un nombre compuesto: dos en el País Vasco (Gernika-Lumo y Bidania-Goiatz) y uno en Navarra (Tiebas-Muruarte de Reta). Seguro que hay alguno más!! , pero ya no lo corrijo, al menos por hoy. Tengo justificaciones varias: “La perfección es una pulida colección de errores” (Mario Benedetti), o “La perfección se logra al fin, no cuando no hay nada que agregar, sino cuando ya no hay nada que obtener” (Antoine de Saint-Exupéry) o “Procurando lo mejor estropeamos a menudo lo que está bien” (William Shakespeare) o “buscando perfección encontró dolor” (mía, a medias, la original que me rondaba la cabeza es “la vida es parte buscar placer y parte hallar dolor” de Nacho Vegas) y muchas más que puedes encontrar en www.proverbia.net o similares. No he conseguido arreglar el formato de las tablas, y las datatables no salen!! 👎. Al final tendré que cambiar el theme.↩

Share