上市公司高技术产业分组指标（21类与12类口径）

///更多stata学习资料尽在丘知数据分析会员之家，网址：www.qqrdata.com
//导入原始数据
use 原始数据,clear
duplicates drop stkcd year, force
label data "更多stata学习资料尽在丘知数据分析会员之家：www.qqrdata.com"

///更多stata学习资料尽在丘知数据分析会员之家，网址：www.qqrdata.com
//生成STPT、金融业虚拟变量
gen STPT = 0
foreach i in ST PT{
replace STPT = 1 if regexm(证券简称, "`i'")
}
label var STPT "是否ST或PT，是为1；否为0"
gen 金融业 = 0
foreach i in J{
replace 金融业 = 1 if regexm(行业代码, "`i'")
}
label var 金融业 "是否属于金融业，是为1；否为0"

///更多stata学习资料尽在丘知数据分析会员之家，网址：www.qqrdata.com
//生成虚拟变量，是否高技术产业企业21个大类产业（是否属于国家统计局公布的21个高新技术产业大类，是为1；否为0）
gen 是否高技术产业企业21个大类产业 = 0
foreach i in C26 C27 C34 C35 C37 C38 C39 C40 C43 I63 I64 I65 J69 L72 M73 M74 M75 N77 R86 R87 R88{
replace 是否高技术产业企业21个大类产业= 1 if regexm(行业代码, "`i'")
}
label var 是否高技术产业企业21个大类产业 "是否属于国家统计局公布的21个高新技术产业大类：C26 C27 C34 C35 C37-C40 C43 I63-I65 J69 L72 M73-M75 N77 R86-R88，是为1；否为0"

///更多stata学习资料尽在丘知数据分析会员之家，网址：www.qqrdata.com
//生成虚拟变量，是否高技术产业企业12个大类产业（是否属于文献：《企业杠杆行为与技术创新-曾国安》选取的12个高新技术产业大类，是为1；否为0）
gen 是否高技术产业企业12个大类产业 = 0