上市公司数字投资指标

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

///更多数据尽在丘知数据分析会员之家：www.qqrdata.com
//筛选与数字相关的数字固定资产
use 原始数据1,clear
gen 是否数字固定资产=0
foreach i in 电子设备 办公电子设备 计算机设备 电脑 电脑设备 自动化 电子仪器 仪器 仪表 通讯 邮电 管理设备 电器设备 电器 检测设备 检测 管理 自动 计算机 数据设备 传导 数字 光电 计算 网络 数据 系统 信号 信息 自控 智能 互联网{
	replace 是否数字固定资产=1 if strmatch(固定资产项目, "*`i'*")
	label variable 丘知数据分析会员之家 "www.qqrdata.com"
}
keep if 是否数字固定资产==1

///更多数据尽在丘知数据分析会员之家，网址：www.qqrdata.com 
//汇总计算与数字相关的固定资产项目的期末余额总计
collapse (sum) 期末余额, by( stkcd year )
drop if 期末余额 ==0
save data1,replace

///更多数据尽在丘知数据分析会员之家：www.qqrdata.com
//整理合并固定资产项目数据
use data,clear
merge m:1 stkcd year using data1,nogen keep(1 3) 
replace 期末余额=0 if 期末余额==.
rename 期末余额 数字固定资产期末金额