Introducción

El Directorio Estadístico Nacional de Unidades Económicas (DENUE) proporciona información detallada sobre los establecimientos económicos en México. Este análisis tiene como objetivo explorar la distribución territorial y socioeconómica de las unidades económicas del estado de Tamaulipas utilizando herramientas de análisis de datos en R.

A través de técnicas de limpieza, filtrado y visualización de datos se busca identificar patrones en la actividad económica y el tamaño de las empresas en la región.

Descripción del dataset

setwd("C:/Users/A2223040273/Documents/RMARK")

denue <- read_csv("denue_inegi_28_.csv",
                  locale = locale(encoding = "Latin1"),
                  show_col_types = FALSE)

denue <- denue %>%
  mutate(across(where(is.character),
                ~iconv(.x, from = "Latin1", to = "UTF-8", sub = "")))

nrow(denue)
## [1] 148560
ncol(denue)
## [1] 42
colnames(denue)
##  [1] "id"         "clee"       "nom_estab"  "raz_social" "codigo_act"
##  [6] "nombre_act" "per_ocu"    "tipo_vial"  "nom_vial"   "tipo_v_e_1"
## [11] "nom_v_e_1"  "tipo_v_e_2" "nom_v_e_2"  "tipo_v_e_3" "nom_v_e_3" 
## [16] "numero_ext" "letra_ext"  "edificio"   "edificio_e" "numero_int"
## [21] "letra_int"  "tipo_asent" "nomb_asent" "tipoCenCom" "nom_CenCom"
## [26] "num_local"  "cod_postal" "cve_ent"    "entidad"    "cve_mun"   
## [31] "municipio"  "cve_loc"    "localidad"  "ageb"       "manzana"   
## [36] "telefono"   "correoelec" "www"        "tipoUniEco" "latitud"   
## [41] "longitud"   "fecha_alta"

Preguntas

¿Cuántos registros contiene el dataset?

El dataset contiene 148560 registros.

¿Qué variables describen la actividad económica?

Las variables más relevantes son codigo_act, nombre_act y per_ocu, que describen la actividad económica y el tamaño del establecimiento.

¿Qué variables representan ubicación geográfica?

Las variables entidad, municipio, latitud y longitud representan la ubicación geográfica de cada establecimiento.

Metodología de análisis

Filtrado de datos (Tamaulipas)

denue_tamps <- denue %>%
  filter(cve_ent == 28)

nrow(denue_tamps)
## [1] 148560

Clasificación por tamaño de empresa

denue_tamps <- denue_tamps %>%
  mutate(tipo_empresa = case_when(
    per_ocu == "0 a 5 personas" ~ "Microempresa",
    per_ocu == "6 a 10 personas" ~ "Microempresa",
    per_ocu == "11 a 30 personas" ~ "Pequeña empresa",
    per_ocu == "31 a 50 personas" ~ "Pequeña empresa",
    per_ocu == "51 a 100 personas" ~ "Mediana empresa",
    per_ocu == "101 a 250 personas" ~ "Mediana empresa",
    per_ocu == "251 y más personas" ~ "Gran empresa",
    TRUE ~ "No especificado"
  ))

Generación de indicadores socioeconómicos

Indicador 1

Número de establecimientos por municipio

establecimientos_municipio <- denue_tamps %>%
  group_by(municipio) %>%
  summarise(total = n()) %>%
  arrange(desc(total))

head(establecimientos_municipio)
## # A tibble: 6 × 2
##   municipio    total
##   <chr>        <int>
## 1 Reynosa      26156
## 2 Matamoros    24969
## 3 Tampico      15655
## 4 Victoria     15576
## 5 Nuevo Laredo 14962
## 6 Altamira      8889

Indicador 2

Distribución de establecimientos por tamaño de empresa

empresas_tipo <- denue_tamps %>%
  group_by(tipo_empresa) %>%
  summarise(total = n()) %>%
  arrange(desc(total))

empresas_tipo
## # A tibble: 4 × 2
##   tipo_empresa     total
##   <chr>            <int>
## 1 Microempresa    138250
## 2 Pequeña empresa   8287
## 3 Mediana empresa   1556
## 4 No especificado    467

Visualización de datos

Gráfica 1

Establecimientos por municipio

top_municipios <- establecimientos_municipio %>%
  slice_max(total, n = 10)

ggplot(top_municipios,
       aes(x = reorder(municipio, total), y = total)) +
  geom_col() +
  coord_flip() +
  labs(
    title = "Municipios con mayor número de establecimientos",
    x = "Municipio",
    y = "Número de establecimientos"
  )

Gráfica 2

Distribución por tamaño de empresa

ggplot(empresas_tipo,
       aes(x = tipo_empresa, y = total)) +
  geom_col() +
  labs(
    title = "Distribución de empresas por tamaño",
    x = "Tipo de empresa",
    y = "Número de establecimientos"
  )

Interpretación de resultados

A partir del análisis realizado se observa que ciertos municipios concentran una mayor cantidad de establecimientos económicos. Entre ellos destacan Reynosa, Matamoros, Tampico y Ciudad Victoria, lo cual indica una mayor actividad económica y concentración de servicios y comercio.

Respecto al tamaño de empresa, se identifica que predominan las microempresas y pequeñas empresas. Esto refleja la estructura típica del tejido empresarial en México, donde la mayoría de los negocios corresponden a unidades económicas de pequeña escala.

Este patrón sugiere que gran parte de la actividad económica depende de emprendimientos locales, comercio minorista y servicios.

Implicaciones socioeconómicas

La concentración económica en determinados municipios puede estar asociada a factores como infraestructura, densidad poblacional y presencia de sectores industriales o comerciales.

El predominio de microempresas también indica oportunidades para fortalecer programas de apoyo al emprendimiento, financiamiento para pequeñas empresas y políticas públicas orientadas al crecimiento empresarial.

Conclusiones

El análisis del DENUE permitió identificar patrones territoriales y socioeconómicos en la actividad económica del estado de Tamaulipas.

Se encontró que la actividad económica se concentra principalmente en algunos municipios urbanos y fronterizos. Asimismo, las microempresas representan la mayor proporción de establecimientos económicos.

Estos resultados pueden ser útiles para la planeación económica regional, la identificación de oportunidades de desarrollo y el diseño de políticas públicas orientadas al fortalecimiento del sector empresarial.