#17 Desigualdad de los Ingresos y Gastos: Cómo se calcula el Coeficiente Gini con la ENAHO en STATA

 

Estimad@s, en este video replico la estimación del coeficiente Gini hecha por el Instituto Nacional de Estadística (INEI). Les comparto la sintaxis de cómo calcular el gasto(ingreso) real promedio per cápita mensual, según deciles y ámbito geográfico usando la Encuesta Nacional de Hogares (ENAHO) del 2017 en STATA.

**********
/*
MIEPERHO Número total de miembros del hogar (Excluye a los trabajadores domésticos y a las personas que subarriendan una habitación en el hogar.) GASHOG2D Gasto total bruto INGHOG1D Ingreso total bruto del hogar (incluye ingresos en forma de bienes)
(Las estrategias para monetarizar los bienes se publican en la Nota Técnica de la ENAHO.) LD Deflactor espacial
*/

local path "D:\ENAHO 2017 2018" //Cambiar el nombre segun el folder donde van a bajar la informacion
cd "`path'"

*Bajamos los archivos zipeados del modulo sumaria de la pagina del INEI copy "http://iinei.inei.gob.pe/iinei/srienaho/descarga/STATA/603-Modulo34.zip" 603-Modulo34.zip, replace
copy "http://iinei.inei.gob.pe/iinei/srienaho/descarga/STATA/634-Modulo34.zip" 634-Modulo34.zip, replace

*Descomprimimos los archivos sumaria-2017.dta y sumaria-2018.dta use sumaria-2017.dta, clear

*VARIABLES GEOGRAFICAS (area, regnat)
gen area=estrato
recode area (1/5=1) (6/8=2)
label define area 1 "urbano" 2 "rural"
label values area area gen regnat=1 if dominio<=3 | dominio==8
replace regnat=2 if dominio>=4 & dominio<=6
replace regnat=3 if dominio==7 lab var regnat "Region natural"
lab def regnat 1 "Costa" 2 "Sierra" 3 "Selva"
lab val regnat regnat

*Creamos la variable factor de expansion de la poblacion
gen facpob=factor07*mieperho

*Coeficiente de Gini - desigualdad del gasto e ingreso

*************************************

*Usamos el gasto total bruto (gashog2d) para estimar el gasto real promedio per capital mensual (gpcm)
gen double gpcm= (gashog2d / (mieperho*12)) /ld

*Usamos el ingreso total bruto (inghog1d) para estimar el ingreso real promedio per capita mensual (ipcm)
gen double ipcm= (inghog1d / (mieperho*12)) /ld

************************************

*Generamos una variable "decil" la cual produce la distribucion de los deciles de gasto por miembros del hogar de forma ordenada
xtile decil_gpcm = gpcm [aw=facpob], nq(10)

*Para estimar gasto real promedio per capita mensual, segun deciles de gasto
table decil_gpcm [aw=facpob], c(sum gpcm mean gpcm) format(%15.0f) row

*Desigualdad del gasto, segun ambitos
ineqdec0 gpcm [aw=facpob]
ineqdec0 gpcm [aw=facpob], by(area)
ineqdec0 gpcm [aw=facpob], by(regnat)

*Generamos una variable "decil" la cual produce la distribucion de los deciles de ingreso por miembros del hogar de forma ordenada
xtile decil_ipcm = ipcm [aw=facpob], nq(10)

*Para estimar ingreso real promedio per capita mensual, segun deciles de ingreso
table decil_ipcm [aw=facpob], c(mean ipcm) format(%15.0f) row

*Para estimar ingreso real promedio per capita mensual, segun region natural
table regnat [aw=facpob], c(mean ipcm) format(%15.0f) row

*Desigualdad del ingreso, segun ambitos
ineqdec0 ipcm [aw=facpob]
ineqdec0 ipcm [aw=facpob], by(area)
ineqdec0 ipcm [aw=facpob], by(regnat)

*Estimar los intervalos de confianza
*******************************
*Establecemos las caracteristicas de la encuesta usando las variable factor de expansion, conglomerado y estrato

svyset [pweight=facpob], psu(conglome) strata(estrato)

svy: mean gpcm
svy: mean ipcm
svy: mean ipcm, over(area)
svy: mean ipcm, over(regnat)