econUtilsCo

Utilidades de econometría aplicada para microdatos del DANE — estadística ponderada e indicadores del mercado laboral, en R.

Versión en R del paquete econ-utils-co (Python). Reúne la lógica que se repite en todo análisis de microdatos de encuestas colombianas: estimaciones ponderadas por el factor de expansión (FEX) e indicadores del mercado laboral según la metodología oficial DANE / OIT.

Pensado para usarse directamente en proyectos de R/Shiny/Quarto (como la app GEIH) sin reescribir las mismas funciones en cada uno.

📦 Instalación

# install.packages("remotes")
remotes::install_github("dmetrics1/econUtilsCo")

🚀 Uso

library(econUtilsCo)

# --- Estadística ponderada por factor de expansión ---
ingresos <- c(800000, 1200000, 2500000, 900000)
fex      <- c(120,     340,     15,      500)

mediana_ponderada(ingresos, fex)        # mediana de ingresos expandida
media_ponderada(ingresos, fex)          # promedio ponderado
cuantil_ponderado(ingresos, fex, 0.9)   # percentil 90

# --- Indicadores del mercado laboral (DANE/OIT) ---
tasa_desempleo(desocupados = 10, pea = 100)       # TD = 10
tasa_ocupacion(ocupados = 90, pet = 200)          # TO = 45
tasa_global_participacion(pea = 100, pet = 200)   # TGP = 50

# Alias cortos
td(10, 100)    # 10
to(90, 200)    # 45
tgp(100, 200)  # 50

📚 Funciones

Estadística ponderada (R/ponderacion.R)

Función	Descripción
cuantil_ponderado(values, weights, q)	Cuantil q (0–1) ponderado por acumulación de pesos
mediana_ponderada(values, weights)	Mediana ponderada (cuantil 0.5)
media_ponderada(values, weights)	Promedio ponderado sum(v*w)/sum(w)

Mercado laboral (R/mercado_laboral.R)

Función	Alias	Fórmula
tasa_desempleo(desocupados, pea)	td	Desocupados / PEA × 100
tasa_ocupacion(ocupados, pet)	to	Ocupados / PET × 100
tasa_global_participacion(pea, pet)	tgp	PEA / PET × 100

PET = Población en Edad de Trabajar · PEA = Población Económicamente Activa (ocupados + desocupados).

🧪 Desarrollo

# install.packages(c("devtools", "testthat"))
devtools::load_all()    # carga el paquete
devtools::test()        # corre los 15 tests
devtools::check()       # R CMD check completo

📄 Licencia

MIT — ver LICENSE.md.

👤 Autor

Daniel Molina Barrios — Economista & Data Scientist · Santa Marta, Colombia