文章预览
数据来源 20世纪80年代~2021年中国控烟法治发展报告_皮书数据库 (pishu.com.cn) 清洗数据 cd C : \ Download
import exc Smoke , clear
drop in 73 / 74
replace E = F if mi ( E )
g Year = substr ( E , 1 , 4 )
destring Y , force replace
drop if mi ( Y )
keep A Y
compress
g c2 = substr ( A , 1 , 6 )
sa _ , replace
*
u cre_agrct , clear
su y , d
loc m = r ( min )
loc n = r ( max )
keep Ctnm *
duplicates drop
forv i = ` m '/`n' {
g Y ` i ' = .
}
gather Y *
drop val
g year = substr ( var , 2 , . )
destring * , replace
drop v *
g c2 = substr ( Ctnm , 1 , 6 )
merge m : 1 c2 using _ , nogen
replace Y = 9999 if mi ( Y )
g SmokeControl = y = Y
keep Ctnm * y S
la var S 地区控烟
sa 地区控烟 , replace
d
ta y S 得到结果 Contains data
………………………………