上市公司双元创新平衡性与互补性指标

/// 更多数据尽在丘知数据分析会员之家：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 探索式创新=发明专利授权量
gen 利用式创新=外观设计专利授权量+实用新型专利授权量

//计算双元创新平衡性，为减少缺失值，当分母为0时赋值为1
gen 双元创新平衡性=1-(abs(探索式创新-利用式创新)/(探索式创新+利用式创新))
replace 双元创新平衡性=1 if 双元创新平衡性==.

//计算双元创新互补性，为减少缺失值，对乘积加一后取对数
gen 双元创新互补性=ln(1+探索式创新*利用式创新)

//整理结果
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