Download clear set mem 200m * Base Nacional use "C:\ENIGH2010\concen

clear
set mem 200m
* Base Nacional
use "C:\ENIGH2010\concen.dta", clear
gen entidad=substr(folioviv,1,2)
* Base del Estado de Veracruz
* use if substr(folioviv,1,2)=="30" using "C:\ENIGH2010\concen.dta", clear
* Relación Gasto en Alimentos e Ingreso Corriente
regress alimentos ingcor
sum alimentos ingcor
display _b[ingcor]*7726.495/33262.79
correlate alimentos ingcor
display 0.5320*0.5320
regress alimentos ingcor
hettest
gen lga=log(alimentos)
gen ly=log(ingcor)
reg lga ly
display 3.764983 + .4923511* log(18000)
dis exp(8.5891016)
display 3.764983 + .4923511* log(100000)
dis exp(9.4333845)
nl (alimentos = {alpha} + {beta} * ingcor ^ {gamma}), initial(alpha 1 beta 1 gamma 1)
testnl _b[gamma:_cons] = 1
display .4715463 * 66.1649 * 33262.79 ^ ( .4715463 - 1 )
display .4715463 * 66.1649 * 33262.79 ^ ( .4715463 - 1 ) * 33262.79 / 7726.495
* Modelo de Capital Humano
gen esc=.
replace esc=0 if ed_formal==1 | ed_formal==2
replace esc=3 if ed_formal==3
replace esc=6 if ed_formal==4
replace esc=7.5 if ed_formal==5
replace esc=9 if ed_formal==6
replace esc=10.5 if ed_formal==7
replace esc=12 if ed_formal==8
replace esc=14 if ed_formal==9
replace esc=16 if ed_formal==10
replace esc=18 if ed_formal==11
gen logy=log(trabajo)
reg logy esc
gen edad2=edad*edad
reg logy esc edad edad2
reg logy esc edad edad2 if sexo==2
reg logy esc edad edad2 if sexo==1
dis - .0409041 / ( 2* -.0002928 )
dis - .0440763 / (2* -.0002803 )
dis -.0440503 / ( 2 * -.0003361 )
gen exper=edad-esc-6
reg logy esc edad edad2 exper
gen exper2=exper*exper
reg logy esc exper exper2
reg logy esc exper exper2 if sexo==2
reg logy esc exper exper2 if sexo==1
dis - .0249139 / ( 2* -.0001741 )
dis - .0280153 / (2 * -.0001642 )
dis - .0260567 / (2* -.0002028 )
gen dsexo=(sexo==2)
tab dsexo sexo
reg logy esc exper exper2 dsexo
display 8.041576 + .1210362 * 14 + .025096 * 15 -.0001707 * 15*15 -.1108376 * 1
dis exp(9.9632777)
display 8.041576 + .1210362 * 14 + .025096 * 15 -.0001707 * 15*15
dis exp(10.074115)
* alternativamente
* gen hombre=(sexo==1)
* reg logy esc exper exper2 hombre
gen prim=(esc>=3 & esc <=6)
gen secu=(esc>=7 & esc <=9)
gen bach=(esc>=10 & esc <=12)
gen superior=(esc>=13)
reg logy prim secu bach superior exper exper2 dsexo
dis 1.757221-1.091086