上市公司长期投资指标

///更多数据尽在丘知数据分析会员之家：www.qqrdata.com
//导入原始数据
use 原始数据,clear
label data "更多数据尽在丘知数据分析会员之家：www.qqrdata.com"

//剔除B股，仅保留A股数据
drop if substr(证券代码, 1, 3)=="200" |  substr(证券代码, 1, 3)=="900" 

///更多数据尽在 丘知数据分析会员之家：www.qqrdata.com
//生成企业长期投资
gen 企业长期投资=(研发支出+资本支出)/年初总资产
drop if 企业长期投资==.

//整理结果
keep 证券代码 证券简称 stkcd year 企业长期投资 行业代码 行业名称 所属省份 所属省份代码 所属城市 所属城市代码 丘知数据分析会员之家
order 证券代码 证券简称 stkcd year 企业长期投资 行业代码 行业名称 所属省份 所属省份代码 所属城市 所属城市代码 丘知数据分析会员之家
label data "更多数据尽在丘知数据分析会员之家：www.qqrdata.com"
local var 企业长期投资
foreach v of varlist `var' {
   	   label var `v' "`v'"
}

///更多数据尽在丘知数据分析会员之家： www.qqrdata.com
//保存原始版本
label data "更多数据尽在丘知数据分析会员之家：www.qqrdata.com"
label variable 丘知数据分析会员之家 "www.qqrdata.com"
save 企业长期投资（未剔除未缩尾）.dta, replace
export excel 企业长期投资（未剔除未缩尾）.xlsx, firstrow(var) keepcellfmt replace

//剔除金融业与STPT样本