请选择 进入手机版 | 继续访问电脑版
楼主: 18234089558
16334 19

关于环境不确定性的计算——stata代码和结果 [推广有奖]

  • 2关注
  • 5粉丝

硕士生

8%

还不是VIP/贵宾

-

威望
0
论坛币
2541 个
通用积分
12.0809
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
10364 点
帖子
14
精华
0
在线时间
251 小时
注册时间
2016-2-9
最后登录
2023-11-27

18234089558 发表于 2017-11-27 18:38:25 |显示全部楼层 |坛友微信交流群
相似文件 换一批

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
关于申慧慧老师的环境不确定性的量化,看到论坛里好像没有具体的数据和stata代码,所以在这里lz将环境不确定性的代码以及所用到的数据放在这个帖子,有数据以及结果。lz用的stata14,stata版本低的可能打不开数据,所以我也附上了Excel的数据格式。代码借鉴了这个帖子的代码——https://bbs.pinggu.org/forum.php?mod=viewthread&tid=4455186&page=1#pid44218675,在此基础上进行了一些修改。和大家交流一下,当然还是要一点金币的,就当小挣个钱。

以下是代码:
use sale.dta,clear
rename b001101000 sale
merge m:1 id using ind.dta,nogen
gen ind = substr( nnindcd,1,1 )
encode ind,gen(ind_numb)
drop if ind_numb==10
drop if ind_numb==.
drop if sale==.
xtpattern,gen(pp)
tab pp
gen p6 = strpos(pp, "11111")
sort p6
drop if p6==0
drop pp p6

*
gen msale=.
gen dev=.
forvalues i = 1999(1)2011{
qui gen YEAR= year-`i'

dis "YEAR`i'"
qui  xtset id year
preserve
qui drop if year<=`i' |year> `i'+5
qui bysort id : egen s= sum(YEAR)
qui drop if s != 15
qui egen id_2= group(id)
qui sum id_2
qui local u = r(max)

         forvalues j = 1(1)`u'{
                  
                  qui reg sale YEAR if YEAR <6 &YEAR>0 & id_2 ==`j'&s==15
               
                   qui predict p if YEAR<6 & YEAR>0 & id_2 ==`j' &s==15,r
               
                   qui sum p if id_2==`j',de
                  
                  qui replace dev=r(sd) if id_2==`j' & YEAR==5&s==15
                 
                   qui sum sale if id_2==`j' & YEAR<6 & YEAR>0 &s==15,de
                  
         qui  replace  msale=r(mean) if id_2==`j' & YEAR==5&s==15
                  
                  qui drop  p  
       
                  }
qui drop YEAR
qui drop if dev==.
save eu`i'.dta,replace
restore                  
qui drop YEAR                  
}
dis "loop is over"

use eu1999.dta,clear

forvalues a= 2000(1)2011{
append using eu`a'.dta
}
gen eu =dev/msale
save eu.dta,replace
*行业中位数
use eu.dta,clear
gen eu_ind =.
xgroup year ind_numb,gen(ind_year)
sum ind_year,de
local n=r(max)
forvalues i = 1(1)`n'{
qui sum eu if ind_year==`i',de

qui replace eu_ind= r(p50) if ind_year==`i'
}


save eu.dta,replace


*经行业调整

gen eu_adjusted= eu/eu_ind
label var eu 未经行业调整的环境不确定性
label var eu_ind 行业环境不确定性
label var eu_adjusted 经行业调整的环境不确定性
save eu.dta,replace


use eu.dta,clear

keep id year ind_numb eu_adjusted



工作簿2.xls (3.15 MB, 需要: 5 个论坛币) sale.dta (467.47 KB, 需要: 5 个论坛币) ind.dta (255.41 KB, 需要: 5 个论坛币) eu.dta (2.45 MB, 需要: 5 个论坛币)




二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:Stata tata 不确定性 不确定 确定性

1137118373 学生认证  发表于 2018-6-6 20:27:09 |显示全部楼层 |坛友微信交流群
我看过几篇申慧慧关于环境不确定性的论文,我想知道,环境不确定性中的“环境”具体指的是什么环境?如果是外部宏观环境,为什么用企业微观的收入波动性指标衡量。

使用道具

楼主你好,使用这个命令时中途报错一两次,但是还是得出了最终结果,不知道这是什么情况,可以请教一下吗?

使用道具

王昕彤 发表于 2018-11-28 16:31:27 |显示全部楼层 |坛友微信交流群
小蘑菇学金融 发表于 2018-8-1 22:56
楼主你好,使用这个命令时中途报错一两次,但是还是得出了最终结果,不知道这是什么情况,可以请教一下吗?
请问你解决问题了么 还是用的楼主的代码么

使用道具

王昕彤 发表于 2018-11-28 16:31
请问你解决问题了么 还是用的楼主的代码么
没有用楼主的代码,自己写的

使用道具

Binglingg 发表于 2019-3-30 20:45:07 |显示全部楼层 |坛友微信交流群
小蘑菇学金融 发表于 2018-12-19 19:13
没有用楼主的代码,自己写的
请问可以分享一下吗?有偿

使用道具

Binglingg 发表于 2019-3-30 20:45:36 |显示全部楼层 |坛友微信交流群
小蘑菇学金融 发表于 2018-12-19 19:13
没有用楼主的代码,自己写的
请问可以分享一下吗?有偿

使用道具

小蘑菇学金融 发表于 2018-12-19 19:13
没有用楼主的代码,自己写的
你好,可以探讨一下吗?或者可以分享一下吗?有偿

使用道具

徐小清 发表于 2019-6-29 13:36:45 |显示全部楼层 |坛友微信交流群
在吗?请问您方便指导一下“环境不确定性”指标的计算方法吗?

使用道具

1374872304
qq麻烦加一下,有偿。

使用道具

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注jltj
拉您入交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-3-29 19:42