Matricula: a2181080111

Nombre completo del alumno: Diana Esmeralda Navarro Barrón

Asignatura: Temas Selectos de Tecnologias de la Información

Licenciatura: Licenciatura en Tecnologias de la Información

Semestre: 9°

Nombre del Docente:Dr. José Guadalupe de la Cruz Borrego

Introducción

La presente investigación tiene como propósito diagnosticar la vocación económica del municipio de Altamira, Tamaulipas, a partir de los datos del Directorio Estadístico Nacional de Unidades Económicas (DENUE) del INEGI. A diferencia de otros municipios de la región, este estudio analiza la interacción entre el comercio de subsistencia y el clúster industrial de gran escala.

Métodos de análisis

Herramientas y técnicas • RStudio y Lenguaje R: Utilizados para la carga, limpieza y transformación de los datos del DENUE. • Librerías especializadas: Uso de tidyverse, janitor y stringr para el procesamiento estadístico. • Consultoría con IA (Ollama): Empleada para interpretar la brecha entre los estratos de personal y sugerir estrategias de integración económica.

# Librerías
library(tidyverse)
library(janitor)
library(stringr)

# 1. Carga y limpieza (Altamira, Tamaulipas)
denue_raw <- read_csv("denue_28_csv/conjunto_de_datos/denue_inegi_28_.csv", 
                      locale = locale(encoding = "latin1")) %>%
  clean_names() %>%
  # Limpieza de caracteres para evitar errores en etiquetas
  mutate(across(where(is.character), ~iconv(., from = "latin1", to = "latin1", sub = "")))

# 2. Filtrar por Altamira (cve_mun == "003")
denue_altamira <- denue_raw %>%
  filter(cve_mun == "003")

# Exportar base de datos local de Altamira
write_csv(denue_altamira, "denue_altamira_003.csv")

# 3. Clasificación por actividad y tamaño (per_ocu)
resumen_altamira <- denue_altamira %>%
  group_by(nombre_act, per_ocu) %>%
  summarise(total = n(), .groups = 'drop') %>%
  arrange(desc(total))

# 4. Tabla de Actividades Principales (Top 15)
tabla_altamira <- denue_altamira %>%
  group_by(nombre_act) %>%
  summarise(conteo = n()) %>%
  arrange(desc(conteo))

print(head(tabla_altamira, 15))
## # A tibble: 15 × 2
##    nombre_act                                                             conteo
##    <chr>                                                                   <int>
##  1 Comercio al por menor en tiendas de abarrotes, ultramarinos y miscelÃ…   1282
##  2 Salones y clínicas de belleza y peluquerías                               372
##  3 Asociaciones y organizaciones religiosas                                  329
##  4 Restaurantes con servicio de preparación de tacos y tortas               324
##  5 Comercio al por menor de artículos de papelería                           243
##  6 Pesca y captura de peces, crustáceos, moluscos y otras especies          229
##  7 Restaurantes con servicio de preparación de antojitos                    201
##  8 Reparación mecánica en general de automóviles y camiones               185
##  9 Restaurantes con servicio de preparación de pizzas, hamburguesas, ho…    167
## 10 Comercio al por menor en ferreterías y tlapalerías                        164
## 11 Comercio al por menor de carnes rojas                                     147
## 12 Elaboración de tortillas de maíz y molienda de nixtamal                  144
## 13 Comercio al por menor de frutas y verduras frescas                        134
## 14 Comercio al por menor de artículos usados                                 127
## 15 Comercio al por menor en minisupers                                       122
# 5. Gráfica de Barras por Estrato de Personal (per_ocu)
ggplot(denue_altamira, aes(x = fct_infreq(per_ocu))) +
  geom_bar(fill = "firebrick", width = 0.7) +
  geom_text(stat = 'count', aes(label = ..count..), vjust = -0.5, fontface = "bold") +
  labs(
    title = "Estructura Empresarial por Tamaño de Personal",
    subtitle = "Altamira, Tamaulipas | Fuente: DENUE",
    x = "Rango de Empleados (per_ocu)",
    y = "Número de Establecimientos"
  ) +
  theme_minimal() +
  theme(axis.text.x = element_text(angle = 45, hjust = 1))

Prompt para Ollama (Contexto Industrial)

“Actúa como un consultor de estrategia económica. Analiza los datos del DENUE de Altamira, Tamaulipas. A diferencia de otros municipios, Altamira tiene una fuerte presencia de industria pesada, petroquímica y servicios portuarios, aunque numéricamente existan muchos negocios de ‘0 a 5 personas’. Redacta un informe que:

Explique la dualidad entre el sector servicios/comercio de subsistencia y el clúster industrial de gran escala.

Analice la importancia de los estratos de personal más grandes (más de 250 personas) que aparecen en este municipio.

Sugiera cómo las microempresas locales pueden integrarse como proveedores de la gran industria portuaria.”

Respuesta de Ollama

“El análisis de Altamira revela una de las estructuras económicas más complejas de Tamaulipas. Presenta una economía de enclave industrial con una marcada dualidad:

Mientras que el 80% de los establecimientos son micro-comercios (estratos 0-5), el motor del PIB municipal reside en los estratos de 251 personas y más. Esta brecha indica que la riqueza generada por el puerto y las plantas petroquímicas no siempre se distribuye linealmente hacia el comercio local, creando una economía de ‘dos velocidades’.

Altamira es de los pocos municipios en el estado con una presencia significativa de unidades económicas de gran calado. Estas empresas demandan servicios especializados (mantenimiento industrial, logística, seguridad), lo que representa una oportunidad de especialización que no existe en municipios rurales.

Estrategias de Integración:

Es crucial que las micro y pequeñas empresas locales obtengan certificaciones de calidad (ISO) para poder vender servicios a las grandes industrias.

Desarrollo de Capital Humano para omentar la educación técnica superior para que la población local ocupe las vacantes de los estratos de personal más altos, reduciendo la dependencia de mano de obra foránea en puestos especializados.”