打开APP
userphoto
未登录

开通VIP,畅享免费电子书等14项超值服

开通VIP
投资效率(Richardson,2006)测算stata实现

1.测算方式

1.1回归模型

依据Richardson(2006)的研究结果,企业期望的新增投资主要受到上一期的成长机会、企业规模、资产结构、现金流、企业年龄、股票市场收益率和新增投资的影响。模型如下:

1.2投资效率定义

按照公式(1)进行回归得到残差:

为回归拟合值。

对残差取绝对值得到投资效率:

残差为正部分对应过度投资

残差为负部分对应投资不足

3.关于变量计算定义

3.1 默认定义

本次介绍的默认采用的变量定义如下

/=1.新增投资=/ (购建固定资产和其他长期资产所支付的现金+购买和处置子公司及其他营业单位所支付的现金-固定资产折旧_油气资产折耗_生产性生物资产折旧-处置固定资产、无形资产和其他长期资产收回的现金净额)/期初总资产

/=2.成长性=/ 主营业务收入增长率

/=3.现金水平=/ 货币资金/期初资产总额

/=4.企业年龄=/ 上市年限的对数

/=5.股票市场回报率=/ 考虑现金红利再投资的年个股回报率

3.2其他定义

按照文献对还给出了变量给出了多种不同的计算定义,可以简单调整代码重新计算:

1.新增投资

计算定义一'购建固定资产和其他长期资产所支付的现金'、'购买和处置子公司及其他营业单位所支付的现金'两项之和除以期初总资产

文献:非效率投资、审计监督与股价崩盘风险

记为:invest1

计算定义二 购建固定资产、无形资产和其他长期资产支付的现金-处置固定资产、无形资产和其他长期资产收回的现金净额)/期初总资产

文献:管理者行为、企业生命周期与非效率投资

记为:invest2

计算定义三 (购建固定资产和其他长期资产所支付的现金+购买和处置子公司及其他营业单位所支付的现金-固定资产折旧_油气资产折耗_生产性生物资产折旧-处置固定资产、无形资产和其他长期资产收回的现金净额)/期初总资产

文献:银行持股、投资效率与公司债务融资

记为:invest3

计算定义四 使用现金流表中构建固定资产、无形资产等现金流的支出,并除以期末总资产

文献:利率市场化、非效率投资与资本配置———基于中国人民银行取消贷款利率上下限的自然实验

记为:invest4

*计算定义五 '购建固定资产、无形资产和其他长期资产所支付的现金'、'购买和处置子公司及其他营业单位所支付的现金'、'权益性投资所支付的现金'和'债权性投资支出所支付的现金'之和减去'处置固定资产、无形资产和其他长期资产而收回的现金净额'后与初资产总额的比值

文献:内部控制质量、产权性质与企业非效率投资———基于我国上市公司面板数据的实证研究

记为:invest5

2.成长性

计算定义一 主营业务收入增长率

文献:非效率投资、审计监督与股价崩盘风险

记为:growth1

计算定义二 成长机会托宾Q

文献:管理者行为、企业生命周期与非效率投资

记为:growth2

3.现金水平

计算定义一 现金及现金等价物余额

文献:非效率投资、审计监督与股价崩盘风险

记为:cash1

计算定义二 货币资金/期初资产总额

文献:管理者行为、企业生命周期与非效率投资

记为:cash2

计算定义三 经营活动产生的现金流量净额/期初资产总额

文献:利率市场化、非效率投资与资本配置———基于中国人民银行取消贷款利率上下限的自然实验

记为:cash3

计算定义四 (货币资金+短期投资净额)/期初资产总额

文献:银行持股、投资效率与公司债务融资

记为:cash4

4.企业年龄

计算定义一 上市年限

文献:非效率投资、审计监督与股价崩盘风险

记为:age1

计算定义二 成立年限

文献:内部控制质量、产权性质与企业非效率投资———基于我国上市公司面板数据的实证研究

记为:age2

5.股票市场回报率

计算定义一 考虑现金红利再投资的年个股回报率

文献:管理者行为、企业生命周期与非效率投资

记为:ret1

计算定义二 考虑现金红利再投资的年个股回报率-考虑现金红利再投资的综合年市场回报率

文献:银行持股、投资效率与公司债务融资

记为:ret2

4.Stata实现

4.1数据准备

ssc install winsor2 , replace //安装外部命令用于缩尾

cd '' //设置工作路径

use 'raw_data.dta' , clear //导入数据

xtset stkcd year //确定面板个体和时间设置

4.2变量整理

本次介绍已经将上文提到过的大部分计算定义通过下方代码实现。


/***=1.新增投资=***/


*计算定义一 文献:非效率投资、审计监督与股价崩盘风险

//'购建固定资产和其他长期资产所支付的现金'、'购买和处置子公司及其他营业单位所支付的现金'两项之和除以期初总资产


gen invest1=(购建固定资产_无形资产和其他长期资产支付的现金+(取得子公司及其他营业单位支付的现金净额-处置子公司及其他营业单位收到的现金净额))/期初资产总计 if 期初资产总计~=.

replace invest1=(购建固定资产_无形资产和其他长期资产支付的现金+(取得子公司及其他营业单位支付的现金净额-处置子公司及其他营业单位收到的现金净额))/l.资产总计 if 资产总计~=. & invest1==.



*计算定义二 文献:管理者行为、企业生命周期与非效率投资

//(购建固定资产、无形资产和其他长期资产支付的现金-处置固定资产、无形资产和其他长期资产收回的现金净额)/期初总资产

gen invest2=(购建固定资产_无形资产和其他长期资产支付的现金-处置固定资产_无形资产和其他长期资产收回的现金净额)/期初资产总计 if 期初资产总计~=.

replace invest2=(购建固定资产_无形资产和其他长期资产支付的现金-处置固定资产_无形资产和其他长期资产收回的现金净额)/l.资产总计 if 资产总计~=. & invest2==.



*计算定义三 文献:银行持股、投资效率与公司债务融资

//(购建固定资产和其他长期资产所支付的现金+购买和处置子公司及其他营业单位所支付的现金-固定资产折旧_油气资产折耗_生产性生物资产折旧-处置固定资产、无形资产和其他长期资产收回的现金净额)/期初总资产


gen invest3=((购建固定资产_无形资产和其他长期资产支付的现金-固定资产折旧_油气资产折耗_生产性生物资产折旧-处置固定资产_无形资产和其他长期资产收回的现金净额)+(取得子公司及其他营业单位支付的现金净额-处置子公司及其他营业单位收到的现金净额))/期初资产总计 if 期初资产总计~=.

replace invest3=((购建固定资产_无形资产和其他长期资产支付的现金-固定资产折旧_油气资产折耗_生产性生物资产折旧-处置固定资产_无形资产和其他长期资产收回的现金净额)+(取得子公司及其他营业单位支付的现金净额-处置子公司及其他营业单位收到的现金净额))/l.资产总计 if 资产总计~=. & invest3==.

*计算定义四 文献:利率市场化、非效率投资与资本配置———基于中国人民银行取消贷款利率上下限的自然实验

//使用现金流表中构建固定资产、无形资产等现金流的支出,并除以期末总资产

gen invest4=购建固定资产_无形资产和其他长期资产支付的现金/资产总计


*计算定义五 文献:内部控制质量、产权性质与企业非效率投资———基于我国上市公司面板数据的实证研究

//'购建固定资产、无形资产和其他长期资产所支付的现金'、'购买和处置子公司及其他营业单位所支付的现金'、'权益性投资所支付的现金'和'债权性投资支出所支付的现金'之和减去'处置固定资产、无形资产和其他长期资产而收回的现金净额'后与初资产总额的比值

gen invest5=((购建固定资产_无形资产和其他长期资产支付的现金-处置子公司及其他营业单位收到的现金净额)+(取得子公司及其他营业单位支付的现金净额-处置子公司及其他营业单位收到的现金净额)+投资支付的现金)/期初资产总计 if 期初资产总计~=.

replace invest5=((购建固定资产_无形资产和其他长期资产支付的现金-处置子公司及其他营业单位收到的现金净额)+(取得子公司及其他营业单位支付的现金净额-处置子公司及其他营业单位收到的现金净额)+投资支付的现金)/l.资产总计 if 资产总计~=. & invest4==.


/***=2.成长性=***/

*计算定义一 文献:非效率投资、审计监督与股价崩盘风险
//主营业务收入增长率//

gen growth1=d.营业收入/l.营业收入

replace growth1=营业收入增长率B if growth1==.

*计算定义二 文献:管理者行为、企业生命周期与非效率投资
//成长机会托宾Q

gen growth2=托宾Q值A


/***=3.公司规模=***/
gen size=ln(资产总计)


/***=4.资产负债率=***/

gen Lev=负债合计/资产总计


/***=5.现金水平=***/

*计算定义一 文献:非效率投资、审计监督与股价崩盘风险
//现金及现金等价物余额

gen cash1=期末现金及现金等价物余额/期初资产总计 if 期初资产总计~=.
replace cash1=期末现金及现金等价物余额/l.资产总计 if cash1==. & 资产总计~=.

*计算定义二 文献:管理者行为、企业生命周期与非效率投资
//货币资金/期初资产总额

gen cash2=货币资金/期初资产总计 if 期初资产总计~=.
replace cash2=货币资金/l.资产总计 if cash2==. & 资产总计~=.

*计算定义三 文献:利率市场化、非效率投资与资本配置———基于中国人民银行取消贷款利率上下限的自然实验
//经营活动产生的现金流量净额/期初资产总额

gen cash3=经营活动产生的现金流量净额/期初资产总计 if 期初资产总计~=.
replace cash3=经营活动产生的现金流量净额/l.资产总计 if cash3==. & 资产总计~=.


*计算定义四 文献:银行持股、投资效率与公司债务融资
//(货币资金+短期投资净额)/期初资产总额

gen cash4=(货币资金+短期投资净额)/期初资产总计 if 期初资产总计~=.
replace cash4=(货币资金+短期投资净额)/l.资产总计 if cash4==. & 资产总计~=.


/***=6.企业年龄=***/

*计算定义一 文献:非效率投资、审计监督与股价崩盘风险
//上市年限
gen age1=ln(year-listyear+1)

*计算定义二 文献:内部控制质量、产权性质与企业非效率投资———基于我国上市公司面板数据的实证研究

//成立年限
gen age2=ln(year-estyear+1)


/***=7.股票市场回报率=***/

*计算定义一 文献:管理者行为、企业生命周期与非效率投资
//考虑现金红利再投资的年个股回报率

gen ret1=Yretwd


*计算定义二 文献:银行持股、投资效率与公司债务融资
//考虑现金红利再投资的年个股回报率-考虑现金红利再投资的综合年市场回报率

gen ret2=Yretwd-Yretwdos

4.3 数据预处理

*1.删除行业、交易状态等缺失的样本

drop if LISTINGSTATE==''
drop if IndustryCode==''

*2.生成行业分类
gen Industry=substr(IndustryCode, 1, 1)
replace Industry=substr(IndustryCode, 1, 2) if Industry=='C'

*3.剔除金融行业
drop if Industry=='J'

4.4 选择采用变量定义和研究时间范围

这里选择3.1节默认的定义,若需要选择其他计算定义,如选择“invest1”作为新增投资,则将global Invest 'invest3'改写为global Invest 'invest1'。

**********变量设置*********

/***=1.新增投资=***/
global Invest 'invest3'

/***=2.成长性=***/
global Growth 'growth1'

/***=3.现金水平=***/
global Cash 'cash1'

/***=4.企业年龄=***/
global Age 'age1'

/***=5.股票市场回报率=***/
global Ret 'ret1'

年份选择通过如下代码实现: 这里选择的默认时间是1998到2022年。

**********年份选择*********

keep if inrange(year,1998,2022)

接下来删除缺失值处理:

**********删除缺失值**********

foreach var in $Invest $Growth $Cash $Age $Ret size Lev{
drop if `var'==.
}



4.5 投资效率测算

以沪深主板非金融行业且正常交易起的上市公司为例。

keep if LISTINGSTATE~='正常上市'
*保留 1=上证A股市场 (不包含科创板),4=深证A股市场(不包含创业板),16=创业板, 32=科创板,64=北证A股市场。
keep if inlist(Markettype,'1','4')

进行测算:

**********数据缩尾*********

winsor2 $Invest $Growth $Cash $Age $Ret size Lev , replace cut(1 99)

******进行回归******
xi: reg $Invest l.($Invest $Growth size Lev $Cash $Age $Ret) i.year i.Industry , vce(cluster year Industry)

predict res , res

*投资非效率
gen Inv=abs(res)

*过度投资
gen Overinv = Inv if res>0

*投资不足
gen Underinv = Inv if res<0

label var res 'Richardson模型残差'
label var Inv '投资非效率'
label var Overinv '过度投资'
label var Underinv '投资不足'



keep 证券简称 证券代码 LISTINGSTATE Stkcd stkcd year Industry $Invest $Growth size Lev $Cash $Age $Ret res Inv Overinv Underinv


*****导出测算结果
save 非效率投资Richardson模型,replace
export excel using '非效率投资Richardson模型.xlsx', firstrow(variables) nolabel replace keepcellfmt


5参考文献

[1]Over-investment of free cash flow. Social Science Electronic Publishing. 

[2]田昆儒, & 孙瑜. (2015). 非效率投资,审计监督与股价崩盘风险. 审计与经济研究(2), 9. 

[3]侯巧铭, 宋力, & 蒋亚朋. (2017). 管理者行为、企业生命周期与非效率投资. 会计研究(3), 7. 

[4]王善平, & 李志军. (2011). 银行持股、投资效率与公司债务融资. 金融研究(5), 10. 

[5]杨筝, 刘放, & 李茫茫. (2017). 利率市场化、非效率投资与资本配置——基于中国人民银行取消贷款利率上下限的自然实验. 金融研究(5), 16. 

[6]王治张皎洁郑琦. (2015). 内部控制质量,产权性质与企业非效率投资——基于我国上市公司面板数据的实证研究. 管理评论, 027(009), 95-107.

本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报
打开APP,阅读全文并永久保存 查看更多类似文章
猜你喜欢
类似文章
【热】打开小程序,算一算2024你的财运
现金流量表计算公式
现金流量表
投资活动产生的现金流量净额如何计算
财务比率计算公式大全
六步编好现金流量表
企业会计准则——现金流量表(讲解及应用)
更多类似文章 >>
生活服务
热点新闻
分享 收藏 导长图 关注 下载文章
绑定账号成功
后续可登录账号畅享VIP特权!
如果VIP功能使用有故障,
可点击这里联系客服!

联系客服