* setup
version 14.2
capture log close
set more off

* open log
log using chap06Wooldridge, replace text

* open data
use "/Users/denisardalves/Desktop/EAE 324 2017/DATA SET/BWGHT.DTA", clear

histogram bwght, normal bin(20)
reg bwght cigs faminc
ereturn list
estimates store bwght
reg bwghtlbs cigs faminc
ereturn list
estimates store bwghtlbs
reg bwght packs faminc
ereturn list
estimates store bwght2
* para montar uma bela tabela de regressões para trabalhos
esttab  bwght bwghtlbs bwght2, b(%10.4f) se scalars(N r2 rmse rss F) mtitles keep(cigs packs faminc _cons)  title("Table 6.1 Effects of Data Scaling")
/*Para salvar a tabela para coloca-la em um documento em Word, use o seguinte comando:*/
quietly esttab bwght bwghtlbs bwght2 using TabelaScaling.rtf, replace b(%10.4f) se scalars(N r2 rmse rss F) mtitles keep(cigs packs faminc _cons)  title("Table 6.1 Effects of Data Scaling")
*Beta Coefficients
*dados
use "/Users/denisardalves/Desktop/EAE 324 2017/DATA SET/HPRICE2.DTA", clear

sum price nox crime rooms dist stratio
*regressão hedônica
reg price nox crime rooms dist rooms stratio
gen zprice=(price-22511.51)/9208.856
gen znox=(nox--5.549783)/ 1.158395
gen zcrime=(crime-3.611536)/ 8.590247
gen zrooms=(rooms- 6.284051)/.7025938
gen zdist=(dist- 3.795751)/2.106137
gen zstratio=(stratio-18.45929)/2.16582 
*beta regression da regressão hedônica
reg zprice znox zcrime zrooms zdist zstratio
/* o beta coeff. de nox, betaznox = (desv. padrão de nox/desv. padrão de price)*coef. nox da reg. multipla usual*/
scalar beta1nox=( 1.158395/ 9208.856)* -2706.433 
*confira com o coeficiente estimado da variável znox da beta regression
**USO DE LOG
* regressão de preço de casas e poluição em forma log
reg lprice lnox rooms



*PQ USAR LOGY?
use "/Users/denisardalves/Desktop/EAE 324 2017/DATA SET/WAGE1.DTA", clear


histogram wage, normal bin(20)
histogram lwage, normal bin(20)