Stata | 从 CNRDS 和 CSMAR 整理区县面板数据

cd ../CNRDS
global files "区县基本情况 区县综合经济 区县教育、卫生和社会保障 区县教育、卫生和社会保障"
foreach f of global files{
	import excel using "`f'.xlsx", clear
	drop in 1
	nrow
	replace 指标 = usubinstr(指标,"(","",.)
	replace 指标 = usubinstr(指标,")","",.)
	replace 指标 = usubinstr(指标,"：","",.)
	levelsof 指标, local(variables)
	foreach v of local variables{
		preserve
		keep if 指标 == "`v'"
		destring 数值 年份, force replace 
		keep 年份 省份 地区 地区编码 数值
		rename 数值 `v'
		save `v', replace
		restore
	}
}
fs *.dta
foreach f in `r(files)'{
	use `f',clear
	duplicates drop 年份 省份 地区, force
	save `f', replace
}
mergemany 1:1 all, match(年份 省份 地区) all
missings report _all,sort percent
rename (省份 地区)(省 县) 
drop 指标
save "../CNRDS中国区县面板数据_2000-2021.dta", replace

cd ../CSMAR
fs *.zip
foreach f in `r(files)'{
	unzipfile `f'
}

fs CNT_*.xlsx
foreach f in `r(files)'{
	import excel using "`f'",clear
	ds
	foreach v in `r(varlist)'{
	replace `v' = usubinstr(`v',"-","",.) in 2 
	}
	drop in 1
	drop in 3
	nrow 
	scalar f_temp = "`f'"
	local fname = usubinstr(f_temp,".xlsx","",.)
	duplicates drop 统计年度 县域代码, force
	save `fname'.dta, replace
}
mergemany 1:1 all, match(统计年度 县域代码) all
destring 年份 教育阶段标识-年末城乡居民储蓄存款余额, replace force
save "../CSMAR中国区县面板数据_2000-2021.dta", replace