Download Diapositiva 1 - WordPress.com

Document related concepts
no text concepts found
Transcript
Distribución del ingreso
ENIGH 2012 Tradicional
Verificación: Tabulados_2012.XLS Tabulado 3.1
Distribución del ingreso
log using "C:\ENIGH 2012 Tradicional\deciles_exactos.log", replace
drop _all
program drop _all
use folioviv foliohog ing_cor tot_integ factor_hog using "C:\ENIGH
2012 Tradicional\concen.dta", clear
gen double yct_pc=ing_cor/tot_integ
sort ing_cor
program define deciles
gen double pi =sum(factor_hog)
gen double ppi=pi/pi[_N]
gen double qi =sum(ing_cor*factor_hog)
gen double qqi=qi/qi[_N]
gen decil = 0
for num 1/10:replace decil=X if ppi>((X-1)/10) & ppi<=(X/10)
end
deciles
sort decil
format pi %19.2f
format qi %19.2f
format ppi %12.9f
format qqi %12.9f
list factor_hog pi ppi ing_cor qi qqi in 1/30
list factor_hog pi ppi ing_cor qi qqi in -30/-1
table decil [iw=factor_hog], c(freq sum ing_cor) f(%20.2f) row
* edit factor_hog pi ppi ing_cor qi qqi
Distribución del ingreso
matrix dec = J(10,4,0)
program define armad
local i=1
recast double pi qi ppi qqi
while `i' < _N {
if decil[`i'] < decil[`i'+1] {
local j=decil[`i']
matrix dec[`j',2]=pi[_N]*(`j'/10)
matrix dec[`j',4]=qi[_N]*(qqi[`i']+(((`j'/10)ppi[`i'])/(ppi[`i'+1]-ppi[`i']))*(qqi[`i'+1]-qqi[`i']))
}
local i=`i'+1
}
end
armad
matrix dec[10,2]=(pi[_N]*ppi[_N])
matrix dec[10,4]=(qi[_N]*qqi[_N])
matrix dec[1,1]=dec[1,2]
matrix dec[1,3]=dec[1,4]
program define compl
matrix dec[`1',1]=dec[`1',2]-dec[`1'-1,2]
matrix dec[`1',3]=dec[`1',4]-dec[`1'-1,4]
end
for num 2/10: compl X
matrix list dec, format(%19.2f)
Distribución del ingreso
dis "Columnas de la matriz desplegada:"
dis "r : Deciles de hogares ordenados por ingreso corriente total trimestral
dis "c1: Hogares en el decil
dis "c2: Acumulado de Hogares al decil
dis "c3: Ingreso Corriente Total trimestral de los Hogares del decil
dis "c4: Acumulado de Ingreso Corriente Total trimestral del Acumulado de Hogares
al decil
* Cálculo del Coeficiente de Gini
program define calc
matrix h = J(11,7,0)
for num 1/10:matrix h[X,1]=X
for num 1/10:matrix h[X,2]=dec[X,3]
for num 1/10:matrix h[11,2]=h[11,2]+h[X,2]
for num 1/10:matrix h[X,3]=X/10
for num 1/10:matrix h[X,4]=h[X,2]/h[11,2]
for num 1/10:matrix h[11,4]=h[11,4]+h[X,4]
matrix h[1,5]=h[1,4]
for num 2/10:matrix h[X,5]=h[X,4]+h[X-1,5]
for num 2/10:matrix h[X,6]=h[X-1,5]
for num 1/10:matrix h[X,7]=0.1*(h[X,5]+h[X,6])
for num 1/10:matrix h[11,7]=h[11,7]+h[X,7]
end
calc
matrix list h, f(%18.4f)
display "El coeficiente de Gini es : ", 1-h[11,7]
Distribución del ingreso
* lookup concindexi glcurve inequal
* Ingreso Corriente Total
sort ing_cor
gen gi=_n/_N
concindexi ing_cor [w=factor_hog*tot_integ], welfarevar(gi)
inequal7 ing_cor [w=factor_hog*tot_integ]
* Ingreso Corriente Total per-cápita
drop gi
sort yct_pc
sort ing_cor
gen gi=_n/_N
concindexi yct_pc [w=factor_hog*tot_integ], welfarevar(gi)
inequal7 yct_pc [w=factor_hog*tot_integ]
glcurve ing_cor , lorenz xlabel(0(.1)1,grid) ylabel(0(.1)1,grid)
log close
Distribución del ingreso
ENIGH 2012 Tradicional
Columnas de la matriz desplegada:
r :
c1:
c2:
c3:
c4:
Deciles de hogares ordenados por ingreso corriente total trimestral
Hogares en el decil
Acumulado de Hogares al decil
Ingreso Corriente Total trimestral de los Hogares del decil
Acumulado de Ingreso Corriente Total trimestral del Acumulado de Hogares al decil
Verificación: Tabulados_2012.XLS Tabulado 3.1
Distribución del ingreso
ENIGH 2012 Tradicional
Coeficiente de Gini
Verificación: Tabulados_2012.XLS Tabulado 3.1
Distribución del ingreso
ENIGH 2012 Tradicional
Distribución del Ingreso
Corriente Total
Distribución del Ingreso
Corriente Total per-cápita
Verificación: Tabulados_2012.XLS Tabulado 3.1
Distribución del ingreso
.6
.5
.4
.3
.2
.1
0
Lorenz (ing_cor)
.7
.8
.9
1
glcurve ing_cor , lorenz xlabel(0(.1)1,grid) ylabel(0(.1)1,grid)
0
.1
.2
.3
.4
.5
.6
.7
Cumulative population proportion
… más en World Bank, Poverty Analysis Toolkit
.8
.9
1
Distribución del ingreso
ENIGH 2012 Tradicional
Verificación: Tabulados_2012.XLS Tabulado 3.1
Anexo
Fórmulas
Thiessen, Heiner (1997) Measuring the Real World: A Textbook of Applied Statistical Methods, John Wiley & Sons