上市公司新质生产力指标（宋佳等口径）

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

//剔除B股
drop if substr(证券代码, 1, 3)=="200" |  substr(证券代码, 1, 3)=="900" 

///更多数据尽在丘知数据分析会员之家：www.qqrdata.com
//标准化指标
global var 研发人员薪资占比 研发人员占比 高学历人员占比 固定资产占比 制造费用占比 研发折旧摊销占比 研发租赁费占比 研发直接投入占比 无形资产占比 总资产周转率 权益乘数倒数
foreach i in $var {
		qui sum `i'
		gen x_`i'=(`i'-r(min))/(r(max)-r(min))
		replace x_`i'=0.00001 if x_`i'==0
}

//按参考文献中的权重计算新质生产力
gen 新质生产力（使用参考文献权重结果）=0.28*研发人员薪资占比+0.04*研发人员占比+0.03*高学历人员占比+0.02*固定资产占比+0.01*制造费用占比+0.27*研发折旧摊销占比+0.02*研发租赁费占比+0.28*研发直接投入占比+0.03*无形资产占比+0.01*总资产周转率+0.01*权益乘数倒数
winsor2 新质生产力（使用参考文献权重结果）, replace cuts(1 99) by(year)

///更多数据尽在丘知数据分析会员之家：www.qqrdata.com
//根据本样本使用熵值法重新计算各指标权重
global positive_var 研发人员薪资占比 研发人员占比 高学历人员占比 固定资产占比 制造费用占比 研发折旧摊销占比 研发租赁费占比 研发直接投入占比 无形资产占比 总资产周转率 权益乘数倒数

///更多数据尽在丘知数据分析会员之家：www.qqrdata.com
//开始计算
global all_var $positive_var

//计算各指标的比重