Uloading
Uloading
This commit is contained in:
52
Chililabdata/GenLongRes.do
Normal file
52
Chililabdata/GenLongRes.do
Normal file
@@ -0,0 +1,52 @@
|
||||
clear
|
||||
cd c:\chililabdata\data
|
||||
use individres.dta
|
||||
gen eventdate=res_sdate/86400000
|
||||
keep individid res_seventtype eventdate
|
||||
rename res_seventtype eventtype
|
||||
gen year = year(eventdate)
|
||||
replace year = 2004 if year <2004
|
||||
save statevent, replace
|
||||
|
||||
use individres.dta
|
||||
gen eventdate=res_edate/86400000 if res_edate!=.
|
||||
keep individid res_eeventtype eventdate
|
||||
rename res_eeventtype eventtype
|
||||
gen year = year(eventdate)
|
||||
replace year = 2013 if year > 2013
|
||||
replace year = 2013 if eventdate==.
|
||||
replace year = 2004 if year <2004
|
||||
replace eventtype = "CONT" if eventdate==.
|
||||
replace eventdate = mdy(12,31,2013) if eventdate==.
|
||||
append using statevent
|
||||
duplicates drop individ eventtype year, force
|
||||
sort individid year
|
||||
|
||||
gen period = year[_n+1]-year if individ == individid[_n+1]
|
||||
|
||||
expand period if eventtype =="ENU" | eventtype =="IMG" | eventtype =="BTH"
|
||||
sort individid year
|
||||
by individid year: gen p=_n-1
|
||||
replace year = year + p
|
||||
keep if eventtype =="BTH" | eventtype =="ENU" | eventtype =="IMG" | eventtype =="ENT" | eventtype =="CONT"
|
||||
merge m:1 individ using individual, keepusing(birthdate gender)
|
||||
keep if _merge ==3
|
||||
drop _merge
|
||||
destring gender, replace
|
||||
rename gender sex
|
||||
replace birthdate=birthdate/86400000
|
||||
|
||||
format %td eventdate
|
||||
format %td birthdate
|
||||
|
||||
gen birthyear = year(birthdate)
|
||||
|
||||
gen age = year - birthyear
|
||||
drop if age < 0
|
||||
drop if year < 2004
|
||||
drop if year > 2013
|
||||
drop if age > 100
|
||||
d
|
||||
save c:\chililabdata\data\death\longindivid, replace
|
||||
drop if age < 60
|
||||
save c:\chililabdata\data\death\60longindivid, replace
|
Reference in New Issue
Block a user