在實(shí)證分析時坯苹，經(jīng)常使用高新技術(shù)企業(yè)認(rèn)定數(shù)據(jù)進(jìn)行分類討論并园，本期推文將介紹如何使用stata將CSMAR數(shù)據(jù)庫中的資質(zhì)認(rèn)定數(shù)據(jù)生成方便使用的面板數(shù)據(jù)悍赢。
數(shù)據(jù)準(zhǔn)備
從CSMAR數(shù)據(jù)庫下載企業(yè)資質(zhì)認(rèn)定的原始數(shù)據(jù)（原始數(shù)據(jù).xlsx）
代碼解讀
/定義文件路徑
cd?C:\Users\86132\Desktop\高新技術(shù)企業(yè)
//導(dǎo)入從CSMAR數(shù)據(jù)庫下載企業(yè)資質(zhì)認(rèn)定的原始數(shù)據(jù)
import?excel??原始數(shù)據(jù).xlsx,firstrow?clear
//選擇資質(zhì)認(rèn)定類型為高新技術(shù)企業(yè)
keep?if?認(rèn)定項(xiàng)目類型=="高新技術(shù)企業(yè)"?
//選擇認(rèn)定對象為上市公司本身
keep?if??認(rèn)定對象身份=="上市公司本身"?
//考慮到CSMAR數(shù)據(jù)庫一部分樣本認(rèn)定時間缺失提蕴，將缺失的認(rèn)定時間填充為公告日期
replace?認(rèn)定時間=公告日期?if?認(rèn)定時間==""
//截取有效期數(shù)字
gen?有效期限1=real(substr(有效期限,1,1))
//考慮到CSMAR數(shù)據(jù)庫一部分樣本有效期缺失林葬，將缺失的有效期填充為常見的3年
replace?有效期限1=3?if?有效期限1==.
//截取認(rèn)定時間年份數(shù)據(jù)
gen?year=real(substr(認(rèn)定時間,1,4))
keep?證券代碼??有效期限1?year
//考慮到CSMAR數(shù)據(jù)庫存在一年多次認(rèn)定的數(shù)據(jù)膳算，選擇一年有效時間最長的
bys?year?證券代碼:egen?n=max(有效期限1)?
keep?if?有效期限1==n
//刪除重復(fù)值
duplicates?drop?證券代碼?year?,force
//使用joinby命令兔魂，將研究樣本整個期間的基礎(chǔ)面板數(shù)據(jù)分別合并至高新認(rèn)定年份
joinby?證券代碼??using?基礎(chǔ)面板數(shù)據(jù).dta
sort?證券代碼?year?year1
//生成年份與高新認(rèn)定年份的相對年份差
gen?time1=year-year1
//對有效期內(nèi)的年份賦值
*?CSMAR數(shù)據(jù)庫里面高新有限期刊做多為6年，最少為1年
gen?hi=1?if?time1<1?&?time1>-3?&?n==3??
replace?hi=1?if?time1<1?&?time1>-1?&?n==1
replace?hi=1?if?time1<1?&?time1>-2?&?n==2
replace?hi=1?if?time1<1?&?time1>-4?&?n==4
replace?hi=1?if?time1<1?&?time1>-5?&?n==5
replace?hi=1?if?time1<1?&?time1>-5?&?n==6?
keep?證券代碼??year1??hi
keep?if?hi==1
rename?hi?高新技術(shù)企業(yè)
//刪除重復(fù)值
duplicates?drop?證券代碼?year?,force
//合并基礎(chǔ)面板數(shù)據(jù)
merge?1:1?證券代碼?year1?using?基礎(chǔ)面板數(shù)據(jù).dta,keep(2?3)?nogen
replace?高新技術(shù)企業(yè)=0?if?高新技術(shù)企業(yè)==.
sort?證券代碼?year
rename?year1?year
keep??證券代碼?year?高新技術(shù)企業(yè)?
save?上市公司高新技術(shù)企業(yè),replace