I. Introducción

La irrupción de la pandemia por COVID-19 y la declaración del Aislamiento Social, Preventivo y Obligatorio (ASPO) como principal medida preventiva en Argentina ha puesto de manifiesto, como nunca antes, la relevancia de contar con accesos de calidad a servicios de conectividad. La suspensión de las actividades presenciales y el traslado hacia la virtualidad en la mayoría de las actividades sociales, laborales y educativas ha colocado a Internet como un herramienta e insumo fundamental. En este escenario, el acceso a Internet se ha colocado en la agenda pública y también ha suscitado nuevamente el debate acerca del acceso a Internet como derecho humano y como condición escencial para el ejercicio y desarrollo pleno de otros derechos económicos, sociales, políticos y culturales tales como la educación en condición de igualdad, la salud, el acceso a información y el trabajo.

En este marco, el presente trabajo tiene como objetivo principal explorar y describir la conectividad a Internet en Argentina. Se asume como objetivo específico indagar acerca de la infraestructura digital en Argentina, el acceso a Internet, su calidad y velocidad desde una mirada provincial y regional. De esta manera, busca constituir un diagnostico de la situación de la conectividad en Argentina.

Este trabajo se enmarca en el Curso de Posgrado “Big Data e Inteligencia Territorial” de la Facultad Latinoamericana de Ciencias Sociales (FLACSO) de las materias “Introducción a la Ciencia de Datos” y “Ciencia de Datos Geográfica” dictada por Victoria O´Donnell y Antonio Vazquez Brust.

Plan de Trabajo

El presente trabajo práctico se estructura en cuatro secciones. En la primera, se analiza la penetración y la evolución del acceso a Internet por parte de los hogares desde una mirada nacional, regional y provincial. En segundo lugar, se explora la calidad de la conexión a Internet en terminos de velocidad y Mbps promedio de bajada a nivel nacional y jurisdiccional. En la tercera sección, el trabajo incorporá un análisis de las tecnologías para el acceso a Internet. Finalmente, en la última sección, la propuesta plantea como dimensión analítica la asociación entre diversos tipos de tecnologías para el acceso a Internet y la velocidad donde nos concentraremos específicamente en la relación de la penetración de Fibra Óptica y velocidad.

II. Penetración y Acceso a Internet: una mirada de su cobertura

Para comenzar, esta sección tiene como propósito generar indagar acerca del acceso a Internet en Argentina desde una mirada territorial. Para ello, en este primer análisis nos concetraremos en el acceso a Internet fijo por parte de los hogares. Esta información se obtiene del Portal de Datos Abiertos de ENACOM que dispone datos desagrados por año, trimestre y provincia desde el año 2014. El indicador permite observar la cantidad de hogares con acceso a Internet de tipo fijo cada 100 hogares.

Evolución del Acceso a Internet Fijo cada 100 hogares: un primer análisis

Un primer aspecto a contemplar constituye la evolución del número de hogares con acceso a Internet fijo cada 100 hogares en Argentina.

penetracion_nac <-read_excel(path = "~/Conectividad/Conectividad/penetracionnacional_internetfijo.xlsx") %>%
   rename("Accesoshogares"= "Accesos por cada 100 hogares", 
          "Accesoshab"="Accesos por cada 100 hab") 

penetracion_nac1t <- penetracion_nac %>%
  filter(Trimestre=="1") 

ggplot(data=penetracion_nac1t,
       aes(x=Periodo, y=Accesoshogares,group=1)) +
  geom_path(color="steelblue",size=1,linetype=1,) +
  geom_point(color="steelblue",size=3) +
  labs(title ="Penetración de Internet fijo por cada 100 hogares (2014-2020)", 
       subtitle = "Argentina, 1º Trimestre 2014 - 1º Trimestre 2020" ,
       x="Periodo", 
       y="Penetración por hogares", 
       caption = "Fuente: Datos Abiertos ENACOM") +
  theme_classic() +
  theme(axis.text.x = element_text(face = "bold",colour = "black")) +
  theme(axis.text.y = element_text(face="bold", colour="black")) +
  scale_y_continuous(breaks = c(52,56,60,64)) +
  geom_label(aes(label=Accesoshogares), size=3.5, nudge_x = 0.35) 

#theme(axis.text.x = element_text(angle = 0, hjust=1 ,vjust = 0, face = "bold", size = 8, colour = "black")) hay que agregar etiqueta de puntos, ver cuestiones estéticas

Como es posible observar, el número de hogares con acceso a Internet fijo muestra una tendencia creciente desde el año 2014 en Argentina. Mientras que para el año 2014, 50 de cada 100 hogares contaba con acceso a Internet fijo, para el año 2020 el acceso asciende a 63 hogares en promedio. De esta manera, para el primer trimestre del 2020 63 de cada 100 hogares argentinos posee Internet fijo en sus hogares. En particular, se detecta un marcado incremento a partir del año 2017.

Acceso a Internet por provincia

¿Cómo es el acceso a Internet por provincia? Si bien a nivel nacional se evidencia una tendencia creciente en el acceso a Internet fijo por parte de los hogares, resulta de interés conocer la realidad del acceso a Internet fijo por provincia en Argentina. A continuación, con la base de datos utilizada, se ejecutan una serie de transformaciones y técnicas para obtener una mirada provincial del acceso a Internet.

penetracion_internet <- read_excel(path = "~/Conectividad/Conectividad/penetracion_internet.xlsx") %>% 
  rename("Accesos"= "Accesos por cada 100 hogares","Ano"="Año")

penetracionprov_2t2020 <- penetracion_internet %>%
  filter(penetracion_internet$Ano==2020,penetracion_internet$Trimestre==2) 

ggplot(data = penetracionprov_2t2020) +
  aes(x=reorder(Provincia,-Accesos), y=Accesos, group=1) +
  geom_bar (stat="identity", position = "dodge" ,fill="#1b9e77") +
   geom_text(aes(label=Accesos), vjust=1.6, color="white", size= 2.2) +
  labs(title="Penetración de Internet fijo cada 100 hogares por provincia",
  subtitle="Argentina, 2º Trimestre, Año 2020", 
  x="Provincias", 
  y="% de hogares con acceso a Internet",
  caption = "Fuente: elaboración propia en base a Datos Abiertos ENACOM") +
  theme_classic() +
  theme(axis.text.x = element_text(angle = 45, hjust=1 ,vjust = 1, face = "bold", size = 8, colour = "black"))

De la visualización exhibida, se desprende que la jurisdicción con una mayor penetración de Internet es la Ciudad Autónoma de Buenos Aires, con un guarismo que incluso traspasa el 100% de los hogares para el 2º Trimestre de 2020. Luego de CABA, se encuentran San Luis (78.41), Tierra del Fuego (76.37), La Pampa (76.1), Córdoba (72.71) y Santa Fe (70). Por su parte, las provincias con una menor proporción de hogares con acceso a Internet fijo constituyen Formosa (31.14), San Juan (35.09) y Santa Cruz (35.79). A continuación, se presenta un mapa cloroplético que permite observar las disparidades entre provincias encontradas relativas al acceso a Internet fijo para el 2º Trimestre del año 2020.

pais<- st_read ("~/Conectividad/paisprov2012.shp")
## Reading layer `paisprov2012' from data source `C:\Users\Usuario\Documents\Conectividad\paisprov2012.shp' using driver `ESRI Shapefile'
## Simple feature collection with 24 features and 4 fields
## geometry type:  MULTIPOLYGON
## dimension:      XY
## bbox:           xmin: 2952780 ymin: 3898419 xmax: 4740872 ymax: 7596595
## projected CRS:  POSGAR_94_Argentina_3
pais <- pais %>%
  left_join(penetracionprov_2t2020, by= "Codigo")

ggplot() +
  geom_sf (data = pais, aes(fill=Accesos), color= NA) +
  theme_void() +
  labs(title = "Penetración de Internet fijo cada 100 hogares por provincia", 
         subtitle = "Argentina, 2º Trimestre - Año 2020",
         fill = "% de hogares",
         y="",
         x="", 
         caption = "Fuente: ENACOM") +
  scale_fill_viridis_c()

#+geom_sf_text(data = pais, aes(label=Provincia), size=1.2,colour="white")

A partir de las herramientas disponibles y para lograr un mejor visualización, el siguiente mapa permite observar el acceso a Internet fijo por cada 100 hogares para el 2º Trimestre de 2020 de forma interactiva.

pais<- st_transform(pais, crs = 4326)

pal <- colorQuantile("YlGn", NULL, n = 5)
state_popup1 <- paste0("<strong>Estado: </strong>", 
                      pais$geometry, 
                      "<br><strong>Accesos: </strong>", 
                      pais$Accesos)

leaflet(data = pais) %>%
  addProviderTiles("CartoDB.Positron") %>%
  addPolygons(fillColor = ~pal(pais$Accesos), 
              color = "#444444",
              fillOpacity = 2,
              smoothFactor=1, 
              weight = 2, 
              popup = state_popup1,
              label = pais$Accesos, 
              labelOptions = labelOptions(style = list("Provincia"="Accesos"))) %>%
  leaflet::addLegend("bottomright", pal = pal, values=pais$Accesos,title="Hogares con Acceso a Internet")

Variación Interanual en el Acceso a Internet por provincia

Al analizar el acceso a Internet fijo por provincia, un aspecto que resulta fundamental indagar da cuenta de la variación interanual del indicador abordado entre el segundo trimestre del 2019 y 2020 (último periodo con información actualizada). En este sentido, nos preguntamos acerca del crecimiento o no del porcentaje de hogares con acceso a Internet fijo cada 100 hogares por provincia con respecto al segundo trimestre del 2019. ¿Hubo crecimiento generalizado? ¿Cuáles son las jurisdicciones donde se registra un mayor crecimiento?

variacion_interanual <- read_excel(path = "~/Conectividad/Conectividad/variacion_accesos.xlsx") 

variacion_interanual <- variacion_interanual %>%
  mutate(variacioninter=(Accesos_2020-Accesos_2019)) 

variacion_interanual$variacioninter <- round(variacion_interanual$variacioninter,digits = 2) 

ggplot(data = variacion_interanual, aes(x=Provincia, y=Accesos_2020)) + 
  geom_bar (stat="identity", position = "dodge" ,fill="steelblue") +
  geom_text(aes(label=Accesos_2020), color="white", size= 3,hjust=1.2) +
  theme(axis.text.x = element_text(hjust=1,3 ,vjust = 1, face = "bold", size = 8, colour = "black")) +
  theme(axis.text.y = element_text(face = "bold", size = 8, colour="black")) +
  labs(title="Penetración de Internet Fijo por provincia y Variación Interanual",
  subtitle="Argentina, 2º Trimestre, Años 2019 y 2020", 
  x="Provincias", 
  y="% de hogares con acceso a Internet",
  caption = "Fuente: Datos Abiertos ENACOM") + 
  theme_minimal() +
  coord_flip() +
  geom_label(aes(label=variacioninter), size=2.5, hjust=0.90, vjust=0.90, nudge_x = 0.40, nudge_y = 10,label.size = 0.15)

Con respecto a la variación interanual en el acceso a Internet fijo por hogares, 14 provincias registran un aumentos en la penetración de Internet fijo mientras que 10 jurisdicciones verifican un saldo negativo. Dentro del primer grupo, la provincia que registró un mayor aumento en el número de hogares con acceso a Internet fijo entre el 2º Trimestre del 2019 y el 2º Trimestre del 2020 es Catamarca (13.30%). Mientras que en el segundo trimestre de 2019, 32,13 de cada 100 hogares accedía a Internet fijo, para el segundo trimestre de 2020, asciende a 45,43 de 100 hogares. En la misma región, la segunda provincia con mayor incremento es Tucumán, que registra un aumento de 11.64% entre 2019 y 2020. Otras provincias con aumentos significativos son Chubut (10.35), Salta (9.69) y Chaco (5.69).

Por su parte, dentro del grupo de provincias con un descenso en la penetración de Internet fijo por hogares, Tierra del Fuego constituye la provincia con la mayor contracción interanual: mientras que en el segundo trimestre de 2019, 94 de cada 100 hogares disfrutaba de Internet fijo, en el mismo período un año más tarde, 76 hogares de cada 100 poseía Internet fijo. En el mismo camino, se ubica Santiago del Estero (-9.32). Otras provincias con variaciones internuales negativas son San Luis (-3.38), Río Negro (-4.72), Mendoza (-4.50) y CABA (-4.14).

Acceso por región

La desagregación por provincia ha permitido demostrar y poner en evidencia la marcada disparidad en el acceso a Internet fijo entre las provincias Argentinas. A partir de este diagnóstico, un interrogante propicio consiste en conocer la situación desde una mirada regional. ¿Cual es la región que registra un menor acceso a Internet? ¿Es posible identificar un patrón por regiones? Para responder estos interrogantes, a continuación, se analizará el acceso a Internet para las diferentes regiones geográficas.

pais <- pais %>%
  mutate(region = case_when( Provincia == "CABA" ~ "Pampeana",
                           Provincia == "Catamarca" ~ "NOA",
                           Provincia == "Córdoba" ~ "Centro",
                           Provincia == "Corrientes" ~ "NEA",
                           Provincia == "Chaco" ~ "NEA",
                           Provincia == "Entre Ríos" ~ "Centro",
                           Provincia == "Formosa" ~ "NEA",
                           Provincia == "Jujuy" ~ "NOA",
                           Provincia == "La Pampa" ~ "Pampeana",
                           Provincia == "La Rioja" ~ "NOA",
                           Provincia == "Mendoza" ~ "Cuyo",
                           Provincia == "Misiones" ~ "NEA",
                           Provincia == "Neuquén" ~ "Sur",
                           Provincia == "Río Negro" ~ "Sur",
                           Provincia == "Salta" ~ "NOA",
                           Provincia == "San Juan" ~ "Cuyo",
                           Provincia == "San Luis" ~ "Cuyo",
                           Provincia == "Santa Fe" ~ "Centro",
                           Provincia == "Santiago Del Estero" ~ "NOA",
                           Provincia == "Tucumán" ~ "NOA",
                           Provincia == "Santa Cruz" ~ "Sur",
                           Provincia == "Buenos Aires" ~ "Pampeana",
                           Provincia == "Chubut" ~ "Sur",
                           Provincia == "Tierra Del Fuego" ~ "Sur"))

acceso_porregion <- pais %>%
  group_by(region) %>%
  summarise(mean(Accesos)) %>%
  rename("Accesos"="mean(Accesos)") 

acceso_porregion$Accesos <- round(acceso_porregion$Accesos,2)

ggplot(data = acceso_porregion) +
  aes(x=region, 
      y=Accesos) +
  geom_bar(stat = "identity", position = position_dodge(), fill="steelblue") +
  theme_classic() +
  labs(title="Hogares con acceso a Internet fijo por región",
       subtitle = "Argentina, 2º Trimestre 2020", 
       x="Regiones",
       y="% de hogares con acceso a Internet fijo",
       caption = "Fuente: elaboración propia en base a Datos Abiertos - ENACOM") +
    geom_text(aes(label=Accesos), vjust=1.6, color="white", size= 5) +
  scale_x_discrete() +
   theme(axis.text.x = element_text(face = "bold", size = 10, colour = "black"))

ggplot() +
  geom_sf (data = acceso_porregion, aes(fill=Accesos),color=NA) +
  geom_sf_label(data = acceso_porregion, 
                  aes(label = region), size = 2) +
  labs(title = "Hogares con acceso a Internet fijo por región",
         subtitle = "Argentina - 2º Trimestre - Año 2020",
         fill = "% de hogares",
         caption = "Fuente: ENACOM") +
  scale_fill_viridis_c() +
  theme_void()

La región con un menor acceso a Internet fijo cada 100 hogares constituye el NEA constuido por Misiones, Corrientes, Chaco y Formosa. En el NEA, 38 de cada 100 hogares cuenta con acceso a Internet fijo. Otra de las regiones con menor acceso a Internet corresponde al NOA, donde el 48% de los hogares dispone de un acceso a Internet de foma fija. En Cuyo, aproximadamente 50 de cada 100 hogares posee Internet fijo. Por arriba del 50%, se encuentran las regiones Sur, Centro y Pampeana. La región que registra un mayor acceso a Internet fijo, para el segundo trimestre de 2020, es la region Pampeana. En esta región, el 82,% de los hogares cuenta con Acceso a Internet.

III. Velocidad y calidad en el acceso a Internet

Más allá del acceso a Internet fijo por cada 100 hogares, una variable estructural a la hora de analizar la conexión a Internet se refiere su calidad y velocidad. Sin lugar a dudas, la velocidad de la conexión a Internet comporta un indicador de su calidad y representa la condición para el desarrollo de múltiples tareas. ¿Cuál es el escenario de la velocidad de Internet? ¿Es un indicador que varía por provincias y regiones?

Para analizar esta dimensión, se ha escogido como indicador el promedio de Mbps de bajada a partir del portal de Datos Abiertos de ENACOM. El indicador se encuentra disponible desde el año 2014 y se desagrega en trimestres y provincias. Las unidades de medida, como se ha comentado recientemente, constituyen los Mbps (Megabits por segundo) en tanto unidad de trasmisión de datos. Los Mbps hacen referencia a una unidad que se usa para cuantificar un caudal de datos equivalente a 1000 kb/s, es decir, mide el tiempo que tarda la información en llegar a los usuarios desde Internet.

En cuanto a su interpretación, mayores Mbps constatan un mayor caudal de datos disponibles y velocidad de descarga. Por su parte, menores valores dan cuenta de una baja velocidad de Internet. En este sentido, tener menos Mbps resulta insuficiente para acceder a servicios más avanzados como videos, comunicaciones sincrónicas por video llamada y plataformas multimedia.

velocidadnac<- read_excel(path = "~/Conectividad/Conectividad/velocidadmbps_nacional.xlsx") 

velocidadnac1t <- velocidadnac %>%
  filter(Trimestre==1)
  
ggplot(data=velocidadnac1t,
       aes(x=Periodo, y=Mbps,group=1)) +
  geom_path(color="steelblue",size=1,linetype=1,) +
  geom_point(color="steelblue",size=3) +
  labs(title ="Penetración de Internet fijo por cada 100 hogares (2014-2020)", 
       subtitle = "Argentina, 1º Trimestre 2014 - 1º Trimestre 2020" ,
       x="Periodo", 
       y="Mbps promedio de bajada", 
       caption = "Fuente: Datos Abiertos ENACOM") +
  theme_classic() +
  theme(axis.text.x = element_text(face = "bold",colour = "black")) +
  theme(axis.text.y = element_text(face="bold", colour="black")) +
  scale_y_continuous(breaks = c(52,56,60,64)) +
  geom_label(aes(label=Mbps), size=3.5, nudge_x = 0.35)

El gráfico precedente permita mostrar la evolución de la velocidad promedio de Internet en Argentina en terminos de Mbps promedio de bajada. Desde el año 2014, se verifica una tendencia creciente de los Mbps promedio de bajada a nivel nacional. Particularmente, llama la atención el notable incremento de la velocidad de Internet, medida a través de Mbps promedio de bajada, entre 2019 y 2020. A lo largo de un año, se duplicó el promedio de Mbps de bajada a nivel país: mientras que para el primer trimestre de 2019, correspondía a 17.38 Mbps promedio de bajada, para el mismo periodo un año después asciende vertiginosamente a 37.52 Mbps.

Los datos recién presentados disparan un abanico de preguntas relevantes. Por un lado, ¿qué motivos explican el abrupto incremento a lo largo de un año de la velocidad de Internet?. Por otro lado, ¿cuan representativos son estos guarismos respecto de la realidad de cada provincia y región del país? ¿Cuál es el escenario de la velocidad a Internet por provincia? Avancemos, por ahora, sobre estas últimas preguntas.

Velocidad por Provincia

velocidad <- read_excel(path = "~/Conectividad/Conectividad/velocidad_promediombps.xlsx") 

velocidadprovincia_2020 <-velocidad %>%
  filter(velocidad$Año==2020,velocidad$Trimestre==2)

velocidadprovincia_2020 <- velocidadprovincia_2020 %>%
  arrange(desc(velocidadprovincia_2020$Mbps))

ggplot(data = velocidadprovincia_2020) +
  aes(x=reorder(Provincia,-Mbps), y=Mbps, group=1) +
  geom_bar (stat="identity", position = "dodge" ,fill="#1b9e77") +
  geom_text(aes(label=Mbps), vjust=1.6, color="white", size= 2.5) +
  labs(title="Mbps promedio de bajada por provincia",
  subtitle="Argentina, 2º Trimestre, Año 2020", 
  x="Provincias", 
  y="Mbps promedio de bajada",
  caption = "Fuente: Datos Abiertos ENACOM") +
  theme_classic() +
  theme(axis.text.x = element_text(angle = 45, hjust=1 ,vjust = 1, face = "bold", size = 8, colour = "black"))

La velocidad de las conexiones a Internet es una dimensión que, al igual que la penetración de Internet fijo por hogares, varía según provincia. La velocidad de Internet en terminos de Mbps promedio de bajada evidencia una gran disparidad entre provincias.

La jurisdicción con mayor velocidad de Internet constituye la Ciudad Autónoma de Buenos Aires (CABA) con 60 Mbps promdio de bajada. En un segundo lugar, se ubica la provincia de Buenos Aires con 46 Mbps. Le siguen Catamarca (35), Tucumán (33) y Córdoba (31). Por su parte, las jurisdicciones con una menor calidad en el acceso a Internet constituyen San Juan (6 Mbps promedio de bajada), Santa Cruz (7), La Pampa (8), Tierra del Fuego (8) y Chubut (8).

pais <- pais %>%
  left_join(velocidadprovincia_2020, by= "Codigo")

ggplot() +
  geom_sf (data = pais, aes(fill=Mbps), color= NA) +
  geom_sf_label(data = pais, 
                  aes(label = Provincia.y), size = 2) +
  labs(title = "Mbps promedio de bajada por provincia",
      subtitle = "Argentina - 2º Trimestre - Año 2020",
       fill="Mbps promedio de bajada",
         caption = "Fuente: Datos Abiertos ENACOM") +
  scale_fill_viridis_c() +
  theme_void()

Velocidad y disparidad territorial: brecha digital

Como se ha podido corroborar, los datos acerca de la velocidad de Internet por provincia muestran un escenario varipinto de marcada desigualdad entre las unidades subnacionales que conforman el país. Desde diferentes actores y organismos especializados, existe cierto consenso de que la velocidad mínima de conexión para lograr conexiones sincrónicas (teleconferencias, videollamadas), navegar y recibir videos en varios dispositivos es de 20Mbps. En el campo de la educación, de acuerdo a un informe publicado por el Observatorio Argentinos por la Educación, cuando la velocidad es menor a 20 Mbps (Megabits por segundo) se dificultan las actividades de aprendizajes sincrónicos (videoconferencias o foros), solo quedando disponibles las actividades asincrónicas.

De este modo, cabe identificar y visualizar cuantas y cuales son las provincias argentinas con una velocidad promedio menor a 20 Mbps para el segundo trimestre de 220.

pais<- pais %>%
  mutate(tipologia_ok = case_when(Mbps <= 19 ~ "Menos 20Mbps",
                               Mbps >= 20 ~ "20 Mbps y Más"))
                        
ggplot()+ 
  geom_sf(data = pais, aes(fill=tipologia_ok)) +
  theme_void() +
  labs(title = "Velocidad de Internet por provincia", 
       subtitle = "2º Trimestre, Año 2020",
       fill="Velocidad", 
       caption = "Fuente: Datos Abiertos ENACOM")

A partir de la información presentada, catorce provincias registran una velocidad promedio de Internet por arriba de 20 Mbps (20 y más).Dentro este grupo, las provincias de Rio Negro y Entre Ríos recién registraron 20 Mbps de velocidad para el 2º Trimestre del año. Por su parte, diez provincias se encuentran por debajo de la velocidad esperada para un acceso a Internet de calidad. De esta manera, se hace patente así una profunda brecha entre la mitad del país que se conecta a la velocidad que requieren ciertas actividades (videoconferencias, clases sincrónicas) y la otra mitad a la que la conexión apenas le alcanza para, por ejemplo, mandar correos y navegar de forma muy limitada.

IV. Tecnologías para el Acceso a Internet

Hasta aquí hemos analizado de forma exploratoria y descriptiva el acceso a Internet y su velocidad desde una perpectiva territorial. Al desarrollo realizado, se incorporá, en esta sección, el abordaje del acceso a Internet según tipo de tecnología utilizada. Para ello, emprenderemos un análisis de los tipos de tecnologías de acceso a Internet y nos preguntaremos acerca de las divergencias geográficas en terminos de infraestructura tecnológica en terminos de Conectividad. Asimismo, hacia el final de la sección, trataremos de explorar la relación de la infraestructura tecnológica para el acceso a Internet y la velocidad a Internet.

¿De qué hablamos cuando decimos "tecnologías para el acceso a Internet?. Existen diferentes opciones desde la tecnología para acceder al servicio de Internet. Las más frecuentes son aquellas en las cuales el acceso hasta el nodo del Proveedor de Internet se efectúa utilizando como medio de transmisión las redes preinstaladas para la provisión de otros servicios (como por ejemplo, el servicio de telefonía o el servicio de televisión por cable). Sin embargo,en los últimos años han tenido enorme difusión otras tecnologías, con mayor ventajas operativas, tales como la FIbra óptica y la conexión satelital. Para este trabajo, se trabajará con las tecnologías previamente categorizadas y recopiladas por ENACOM. Estas son:

  1. ADSL
  2. Cablemodem
  3. Fibra Óptica
  4. Wireless
  5. Otros

Accesos a Internet en números

Para empezar a analizar la infraestrura tecnológica para el acceso a Internet en Argentina, es menester tener en cuenta, tal como fuera explicado anteriormente, el aumento considerable que han tenido los accesos a Internet desde el 2014 hasta la fecha. Para dimensionar esta evolución positiva, el gráfico que sigue permite mostrar el crecimiento de los accesos a Internet a nivel nacional desde el 2014 en términos absolutos para el primer trimestre de cada año.

tecnopais <- read_excel(path = "~/Conectividad/Conectividad/Internet_Accesos-por-tecnologia.xlsx")
 
evolucion_accesos<- tecnopais %>%
  filter(Trimestre=="1") %>%
  group_by(Año) %>%
  summarise(sum(Total)) %>%
  rename("Total"=`sum(Total)`) 

ggplot(data = evolucion_accesos, aes(x=Año, y=Total)) +
  geom_bar(stat="identity",fill="steelblue") +
  theme_classic() +
  labs(title = "Evolución Accesos a Internet, Argentina, 2014-2020",
       subtitle = "1º Trimestre 2014-2020", 
       x="Años", 
       y="Cantidad de Accesos",
       caption = "Fuente: Datos Abiertos ENACOM") +
  geom_text(aes(label=Total), vjust=1.6, color="white", size= 3) +
  scale_x_continuous(breaks = c(2014,2015,2016,2017,2018,2019,2020))

Desde una perpectiva comparada, tomando los datos de los accesos de los primeros trimestres de cada año, se contempla un ritmo de crecimiento sostenido en todo el período: mientras que para el año 2014, existiían un total de 6.398.398 conexiones a Internet para el primer trimestre del año 2020 ascienden a 8.812.426 accesos a Internet. No obstante, ¿cómo se distribuyen geográficamente las conexiones a Internet?

tecnopais <- tecnopais  %>%
  mutate(region = case_when(Provincia == "Capital Federal" ~ "Pampeana",
                           Provincia == "Catamarca" ~ "NOA",
                           Provincia == "Córdoba" ~ "Centro",
                           Provincia == "Corrientes" ~ "NEA",
                           Provincia == "Chaco" ~ "NEA",
                           Provincia == "Entre Ríos" ~ "Centro",
                           Provincia == "Formosa" ~ "NEA",
                           Provincia == "Jujuy" ~ "NOA",
                           Provincia == "La Pampa" ~ "Pampeana",
                           Provincia == "La Rioja" ~ "NOA",
                           Provincia == "Mendoza" ~ "Cuyo",
                           Provincia == "Misiones" ~ "NEA",
                           Provincia == "Neuquén" ~ "Sur",
                           Provincia == "Río Negro" ~ "Sur",
                           Provincia == "Salta" ~ "NOA",
                           Provincia == "San Juan" ~ "Cuyo",
                           Provincia == "San Luis" ~ "Cuyo",
                           Provincia == "Santa Fe" ~ "Centro",
                           Provincia == "Santiago Del Estero" ~ "NOA",
                           Provincia == "Tucumán" ~ "NOA",
                           Provincia == "Santa Cruz" ~ "Sur",
                           Provincia == "Buenos Aires" ~ "Pampeana",
                           Provincia == "Chubut" ~ "Sur",
                           Provincia == "Tierra Del Fuego" ~ "Sur")) %>%
  rename("Foptica"=`Fibra óptica`)


evolucion_provreg <- tecnopais %>%
  filter(Año=="2020", Trimestre=="1") %>%
  group_by(region) %>% 
  summarise(sum(Total)) %>%
  rename("Total"=`sum(Total)`) 

ggplot(data=evolucion_provreg, aes(x=region, y=Total)) +
  geom_histogram(stat="identity", fill="green4") +
  theme_classic() +
  geom_text(aes(label=Total), vjust=1.6, color="white", size= 3) +
  theme(axis.text.x = element_text(face = "bold", size = 10, colour = "black")) +
  labs(title = "Accesos a Internet por región geográfica, 1ºTrimestre, 2020", 
       subtitle = "Argentina", 
       x="Región", 
       y="Accesos", 
       caption = "Fuente: Datos Abiertos ENACOM") 

options(scipen = 999)

Un análisis geográfico tomando como unidades de análisis a las regiones permite afirmar que la región pampeana es la región donde se concentra el mayor número de accesos a Internet (principalmente por la ubicación geográfica de CABA y Provincia de Buenos Aires). La segunda región con mayor cantidad de accesos a Internet corresponde a la región Centro, donde se encuentran las provincias de Córdoba, Santa Fé y Entre Ríos. Por su parte, el resto de las regiones evidencian menores volumenes de acceso a Internet.

Infraestructura Tecnológica

Ahora bien, ¿cuáles son las tecnologías de mayor utilización en el país??, ¿Existen diferencias en el tipo de tecnología de acceso a Internet por provincia o región?.

A continuación, se puede verificar la evolución de los accesos a Internet por tipo de tecnología utilizada en Argentina para el período 2014-2020 (los valores corresponden al primer trimestre de cada año en todos los casos).

tecnopais_lineal <- read_excel(path = "~/Conectividad/Conectividad/tipotecnologia_lineal.xlsx")

tecnopais1t <- tecnopais_lineal %>%
  filter(Trimestre==1)

ggplot(data = tecnopais1t, aes(x = Ano, y = Accesos, color = Tipo)) + 
  geom_line(size = 1.3) +
  labs(title = "Evolución Accesos a Internet según Tipo de Tecnología, Total país (2014-2020)", 
       subtitle = "Argentina - 1ºTrimestre Años 2014-2020",
       x = "Años", 
       y = "Accesos a Internet",
       caption = "Fuente: Datos Abiertos ENACOM" ) + 
  scale_x_continuous(breaks = c(2014,2015,2016,2017,2018,2019,2020)) +
  scale_color_manual(values=c('#25AAE2','#F2B53A','#8BC540', '#DC5D42','#666666')) +
  guides(colour = guide_legend(override.aes = list(size=6))) +
  theme(axis.text.y = element_text(face = "bold", size=8)) +
  theme_classic() +
  theme(axis.text.x = element_text(face = "bold", size = 10, colour = "black")) 

options(scipen=999)

En el período comprendido entre los años 2014 y 2020, se evidencia una continuidad en la tendencia mostrada durante los últimos años. Por una parte, el gráfico precedente permite mostrar una evolución decreciente de las conexiones por ADSL como tipo de tecnología en el acceso a Internet. En particular, se verifica un marcado descenso entre 2019 y 2020. Por otra parte, es posible observar el aumento de la conexión por Cablemodem en el período analizado. Mientras que en el 1º Trimestre del año 2014, existían un total de 2.407.330 conexiones por Cablemodem, en el 1º Trimestre del 2020, las conexiones por Cablemodem ascienden a 4.903.674 accesos.

Asimimismo, hacia finales del período es notorio el crecimiento de las conexiones a Internet por Fibra óptica. El acceso a Internet gracias a la tecnología provista por la Fibra Ópica es un fenómeno de una marcada tendencia creciente desde el 2014. Para el 1º Trimestre de 2014, las conexiones por Fibra Óptica en el país solamente correspondían a 150.323 accesos. Para el primer trimestre del 2020, las conexiones por Fibra Óptica superan el millón: 1.047.817.

A continuación, el gráfico siguiente permite demostrar la participación de cada tecnología sobre el total de accesos para cada año del período bajo estudio.

tecnopais1t <- tecnopais1t %>% 
  mutate(porc_tec=(Accesos/total)*100)

tecnopais1t$porc_tec <- round(tecnopais1t$porc_tec, digits = 2)

ggplot(tecnopais1t, aes(x=Ano, y=porc_tec,fill=Tipo)) + 
  geom_bar(stat="identity", position = "stack") +
  theme_classic() +
  scale_x_continuous(breaks = c(2014,2015,2016,2017,2018,2019,2020)) +
  labs(title="Porcentaje de Accesos a Internet según tipo de tecnología por año (2014-2020)", 
       subtitle = "Argentina- 1º Trimestre Años 2014-2020", 
       x="Años",
       y= "% de Acceso según tecnología", 
       caption = "Fuente: ENACOM") +
  theme(axis.text.x = element_text(face = "bold", size = 10, colour = "black")) 

options(scipen=999)

Para observar con mayor detalle el comportamiento de cada tecnología, el siguiente gráfico permite contemplar, mediante la técnica de facetado, la evolución de cada tecnología para el período estudiado.

ggplot(data = tecnopais1t) +
  geom_line(mapping = aes(x = Ano, y = Accesos),size=1,color="steelblue") +
  facet_wrap(~ Tipo) +
  theme(axis.text.x = element_text(angle = 35, hjust=1 ,vjust = 1, face = "bold", size = 8, colour = "black")) +
  labs(title = "Evolución de Accesos de Internet según tipo de tecnología (2014-2020)", 
       subtitle = "Argentina", 
       caption = "Fuente: Datos Abiertos ENACOM")

Como se ha indicado, se aprecia con mejor detalle la tendencia creciente de las conexiones por Cablemodem, las cuales parecen ser las más populares, y el declive progresivo de las conexiones por ADSL. También, se verifica el aumento, hacia finales de período, de las conexiones por Fibra Óptica.

tecnopais1t2020 <- tecnopais1t %>%
  filter(Ano=="2020")

tecnopais1t2020$ymax = cumsum(tecnopais1t2020$porc_tec)
tecnopais1t2020$ymin = c(0, head(tecnopais1t2020$ymax, n=-1))
tecnopais1t2020$labelPosition <- (tecnopais1t2020$ymax + tecnopais1t2020$ymin) / 2

colores <- c("#0073C2FF", "#EFC000FF", "#868686FF", "#CD534CFF","tomato4")

ggplot(tecnopais1t2020, aes(ymax=ymax, ymin=ymin, xmax=4, xmin=3, fill=Tipo)) +
  geom_rect() +
  coord_polar(theta = "y") +
  xlim(c(2,4)) +
  theme_void() +
  geom_label(x=3.5, aes(y=labelPosition, label=porc_tec), size=2.5,face="bold") +
  scale_fill_manual(values = colores) +
  labs(title = "Proporción de Accesos a Internet fijo según tipo de tecnología, 2º Trimestre, Año 2020, Argentina", 
       caption = "Fuente: ENACOM")

Desde una mirada actual, para el segundo trimestre del año 2020, el 55,64% de las conexiones a Internet pertenecen a Cablemodem. Por su parte, el 26,09% de los accesos son a través de ADSL. En lo concerniente a Fibra Óptica, en el segundo trimestre del 2020, el 11,89% de las conexiones fueron por Fibra óptica. Por su parte, la tecnología Wireless registra el 4% de las conexiones, mientras que otros tipos de tecnologías componen el 2,37% de las conexiones.

Fibra Óptica en Argentina y su incidencia en la velocidad

En el análisis desarrollado sobre la evolución de las tecnologías para el acceso a Internet, un aspecto que ha tomado protagonismo en los últimos años corresponde al crecimiento de las conexiones por fibra óptica en Argentina. El acceso a Internet por medio de fibra óptica en tanto tipo de tecnología ha demostrado un fuerte crecimiento en los últimos años en nuestro país. Mientras para el primer trimestre de 2014, se registraban 150.323 conexiones a Internet por Fibra Óptica, para el primer trimestre de 2020, el acceso a Internet por este tipo de tecnología asciende a 1.047.817.

Este marcado impulso de la fibra óptica resulta un fenómeno interesante de analizar, especialmente en vinculación con la evolución del acceso y la velocidad a Internet. En este marco, constituye un tópico pertinente preguntarse acerca de la infraestructura de Fibra Óptica en Argentina, sus características, su alcance y sus efectos en la velocidad. Puntualmente, ¿constituye el tipo de tecnología de acceso a Internet un factor explicativo de las divergencias entorno al acceso y/o la velocidad de Internet?

A fin de no exceder los límites de este trabajo práctico, las líneas siguientes ofrecen una primera aproximación. En particular, dado el impulso de la fibra óptica, nos preguntaremos acerca de la relación entre este tipo de tecnología y la velocidad de Internet por provincia: ¿la extensión y penetración de fibra óptica por provincia es un factor explicativo de su velocidad promedio?

Acerca de la Fibra Óptica

Existe un amplio consenso acerca de las profundas ventajas de las conexiones a Internet por Fibra Óptica. En primer lugar, la fibra óptica se destaca su estabilidad: reduce al máximo la posibilidad de microcortes e interferencias y permite la misma velocidad de subida y de descarga, inclusive llegando a 300Mb. Estas características resultan imprescindibles para garantizar una máxima calidad de conexión y satisfacer así las distintas actividades y tareas de los hogares, empresas y ámbitos públicos, laborales y/o educativos.

Como se ha indicado, uno de los beneficios principales de las conexiones por Fibra Óptica es su gran velocidad en la trasmisión de datos, lo cual inclusos supera a otros tipos de tecnologías más tradicionales (ADSL, Cablemodem, Wireless). Sin embargo, un punto clave acerca de la Fibra Optica en Argentina es su infraestructura. En este camino, desde Cámara Argentina de Internet (CABASE), indican que “para que la Argentina siga creciendo en materia de velocidad es necesario un mayor desarrollo de la infraestructura de fibra al hogar” (CITAR). De este modo, se hace patente la importancia de invertir y extender las redes FFTT (Fibras hasta la casa o Fiber To The Home, por sus siglas en Inglés) ya que una de las limitaciones para el acceso a conexión de Fibra Óptica es la disponibilidad de redes en cada localidad.

Penetración de Fibra Óptica en Argetina

¿Cuáles son las provincias con una mayor penetración de Fibra óptica como tecnología para el acceso a Internet? Para comenzar, es menester preguntarse acerca de las jurisdicciones con una mayor proporción de accesos a Internet por Fibra óptica.

fibraoptica <- tecnopais %>%
  filter(Año=="2020",Trimestre=="2")  %>%
  mutate(porcfiboptica=(Foptica/Total)*100) 

fibraoptica$porcfiboptica <- round(fibraoptica$porcfiboptica,digits = 2)

ggplot(data = fibraoptica, aes(x=reorder(Provincia,-porcfiboptica), y=porcfiboptica)) +
  geom_bar(stat="identity",fill="steelblue") +
  theme_classic() +
  labs(title = "Porcentaje de Accesos a Internet por Fibra Óptica según Provincia",
       subtitle = "2º Trimestre, Año 2020, Argentina", 
       y="% de Accesos a Internet por Fibra Optica", 
       x="Provincia",
       caption = "Fuente: Datos Abiertos ENACOM") +
  geom_label(aes(label=porcfiboptica),colour="steelblue",fontface="bold",size=3) +
  theme(axis.text.x = element_text(angle = 45, hjust=1 ,vjust = 1, face = "bold", size = 8, colour = "black"))

Del análisis efectuado, se puede observar que Catamarca y Tucumán son las provincias que registran una mayor proporción de sus accesos a Internet por Fibra Óptica. En Catamarca, el 31% de sus conexiones a Internet son a través de Fibra óptica. Por su parte, en Tucumán un cuarto del total de accesos a Internet pertenecen a este tipo de tecnología. Estos guarismos coinciden con la variación internual en el acceso a Internet por cada 100 hogares que registran ambas provincias con respecto al año 2019. Al parecer, el incremento de nuevos accesos a Internet fijo por hogares en Catamarca y Tucumán fueron realizados con Fibra óptica.

Otras provincias con una participación considerable de la fibra óptica como tecnología respecto del total de conexiones a Internet son Buenos Aires (19,14%), La Pampa (15,85%),Mendoza (14,72%),Chaco (13,48%), Salta (13,66%) y Córdoba (10,26%).

pais <- pais%>%
  left_join(fibraoptica,by="Codigo")

ggplot() +
  geom_sf (data = pais, aes(fill=porcfiboptica), color= NA) +
  labs(title = "Proporción de Accesos a Internet por Fibra Óptica según Provincia",
      subtitle = "Argentina - 2º Trimestre - Año 2020",
       fill="% de Conexiones por Fibra Óptica",
         caption = "Fuente: ENACOM") +
  scale_fill_viridis_c() +
  theme_void()

Fibra Óptica y Velocidad: ¿una asociación?

Uno de los aspectos que nos interesaba abordar consistía en una aproximación hacia los factores explicativos de la velocidad de Internet en Argentina. Para ello, a partir del análisis desarrollado hasta el momento, es factible analizar si existe correlación entre la velocidad de Internet (medida en Mbps promedio de bajada) y la proporción de accesos a Internet por Fibra Óptica. Para esto, se procede a calcular la Correlación de Pearson y avanzar en su visualización.

fibraoptica <- fibraoptica%>%
  left_join(velocidadprovincia_2020,by="Codigo")

ggplot() +
  geom_label(data = fibraoptica,
             aes(x=Mbps, 
                 y=porcfiboptica,
                 label=factor(Provincia.y))) +
  theme_classic() +
  geom_text(check_overlap = TRUE) +
  labs(title = "Asociación Mbps promedio de bajada y Penetración de Fibra óptica por Provincia",
       subtitle = "Argentina, 2º Trimestre - Año 2020", 
       x= "Mbps promedio de bajada",
       y=" % de Accesos a Internet por Fibra Óptica", 
       caption= "Fuente: Datos Abiertos ENACOM")

cor(x=fibraoptica$Mbps, 
    y=fibraoptica$porcfiboptica)
## [1] 0.3708816
dat1 <- data.frame(fibraoptica$Mbps, fibraoptica$porcfiboptica)
chart.Correlation(dat1)

Como se puede verificar, la correlación entre ambas variables es de 0.3708816. Si bien existe asociación, encontramos una correlación positiva débil entre la velocidad de Internet, medida a través de Mbps, y la proporción de conexiones por fibra óptica.

La mayoría de las provincias comparten una baja velocidad con una baja proporción de conexiones a Internet por Fibra Óptica. En la visualización presentada, se destecan las provincias de Catamrca y Tucumán con un alto porcentaje de conexiones a Internet por Fibra Óptica y una velocidad a Internet media. Un outlier que se observa es CABA que si bien es la jurisdicción que registra mayor velocidad, no tiene la misma posición en torno al porcentaje de accesos a Internet por fibra óptica en este territorio.

De esta manera, tras poner a pruebas estas variables, podemos afirmar que la velocidad a Internet, medida a través de Mbps de bajada, estaría siendo en principio explicada por otros factores y/o dimensiones que, si bien exceden los horizontes del presente trabajo práctico, podrían ser analizados, abordados y recuperados en otras presentaciones y trabajos.

Conclusiones y agendas futuras

El presente trabajo práctico ha tenido como propósito estructural explorar y describir el escenario de la conectividad a Internet en Argentina desde una dimensión territorial. En este sentido, a lo largo de sus secciones, se ha podido comprobar y confirmar la existencia de una profunda disparidad en cuanto al acceso, el nivel de conexión y la calidad de los servicios de Internet en nuestro país. Indudablemente, el acceso a una conexión de Internet y su calidad difiere según la región y juridicción que se trate. La infraestructura de conectividad en el Noreste (NEA) Y Noroeste (NOA) es mucho más dispar y desigual que en la Ciudad de Buenos Aires, la Provincia de Buenos Aires o Cuyo.

El informe contribuye a un análisis general de la conectividad en Argentina. Si bien los últimos años dan cuenta de un notable crecimiento de los accesos a Internet fijo por hogares y de la velocidad promedio de Internet, el análisis planteado pone en evidencia la heterogeneidad y la desigualdad territorial de la COnectividad. Desde este punto, conforma un diagnóstico y marca un horizonte claro para el diseño de políticas públicas concretas, en estrecha articulación con el sector privado.

Para futuras investigaciones, una agenda promisoria y pertinente da cuenta de la inclusión de otras dimensiones de análisis. Por ejemplo, la incorporación del acceso a Internet por localidad, el tráfico de Internet, las redes de telecomunicaciones y/ la relación geográfica entre las provincias y/o localidades y puntos de interconexión de tráfico (IXP o Internet Exchange Point).

Bibliografía y Fuentes consultadas