上市公司重污染行业分组指标（三种口径）

///更多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
//生成虚拟变量，是否重污染行业企业1（行业是否属于B06、B07、B08、B09、C17、C19、C22、C25、C26、C28、C29、C30、C31、C32、D44，是为1；否为0）
gen 是否重污染行业企业1 = 0
foreach i in B06 B07 B08 B09 C17 C19 C22 C25 C26 C28 C29 C30 C31 C32 D44{
replace 是否重污染行业企业1= 1 if regexm(行业代码, "`i'")
}
label var 是否重污染行业企业1 "行业是否属于B06、B07、B08、B09、C17、C19、C22、C25、C26、C28、C29、C30、C31、C32、D44，是为1；否为0"

///更多stata学习资料尽在丘知数据分析会员之家，网址：www.qqrdata.com
//生成虚拟变量，是否重污染行业企业2（行业是否属于B06、B07、B08、B09、C15、C17、C18、C19、C22、C25、C26、C27、C28、C29、C31、C32、D44、D45，是为1；否为0）
gen 是否重污染行业企业2 = 0