楼主: 知廿
4347 9

R语言KMv模型 [推广有奖]

  • 1关注
  • 0粉丝

高中生

22%

还不是VIP/贵宾

-

威望
0
论坛币
297 个
通用积分
0.8500
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
209 点
帖子
5
精华
0
在线时间
48 小时
注册时间
2016-12-24
最后登录
2025-3-2

楼主
知廿 发表于 2018-12-20 11:37:10 来自手机 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

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

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
请问有大佬会用R需要应用于KMV模型吗
二维码

扫码加我 拉你入群

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

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

关键词:KMV模型 KMV R语言

沙发
Bleibet 学生认证  发表于 2018-12-20 21:54:16
刚刚做过这个,我把我的分享给你吧
library(nleqslv)
r<-??
T<-??
D<-??
EquitySigma<-??
E<-??
EtoD<-E/D
x0<-c(1,1)

KMVfun<-function(x){
y<-numeric(2);
d1<-(log(x[1]*EtoD)+(r+0.5*x[2]^2)*T)/(x[2]*sqrt(T));
d2<-d1-x[2]*sqrt(T);
y[1]<-x[1]*pnorm(d1)-exp(-r*T)*pnorm(d2)/EtoD-1;
y[2]<-pnorm(d1)*x[1]*x[2]-EquitySigma;
y
}

z<-nleqslv(x0,KMVfun,method="Newton")
Va<-z$x[1]*E
AssetSigma<-z$x[2]

??代表要填的数据

藤椅
知廿 发表于 2018-12-23 01:26:28 来自手机
跟我找的一样,哈哈

板凳
知廿 发表于 2018-12-23 01:27:18 来自手机
请问你波动率的代码有吗,我就差这里了

报纸
方木2333 发表于 2019-3-10 11:43:02 来自手机
Bleibet 发表于 2018-12-20 21:54
刚刚做过这个,我把我的分享给你吧
library(nleqslv)
r
求问nleqslv这个在哪找?

地板
方木2333 发表于 2019-3-10 11:46:33 来自手机
知廿 发表于 2018-12-23 01:27
请问你波动率的代码有吗,我就差这里了
求问nleqsl在哪找?谢谢,有偿

7
方木2333 发表于 2019-3-10 11:46:58 来自手机
Bleibet 发表于 2018-12-20 21:54
刚刚做过这个,我把我的分享给你吧
library(nleqslv)
r
求问nleqslv在哪找,谢谢,有偿

8
gongsuomeng 发表于 2019-3-12 10:22:25
方木2333 发表于 2019-3-10 11:46
求问nleqslv在哪找,谢谢,有偿
你好,请问你找到了吗?我也需要

9
Bleibet 学生认证  发表于 2019-6-11 21:28:57
gongsuomeng 发表于 2019-3-12 10:22
你好,请问你找到了吗?我也需要
天啊,好久没上论坛了,这个有什么要找的啊,直接就是:
install.packages("nleqslv")
输进去选择UK London下载就行了啊,你选择China会下载不到的,中国的服务器包不全。

10
9dY1565100492 发表于 2020-7-10 23:00:23
Bleibet 发表于 2018-12-20 21:54
刚刚做过这个,我把我的分享给你吧
library(nleqslv)
r
请问参数是这个意思吗
r无风险收益率
T期限
D债务
EquitySigma 股价波动收益率
E股票市值

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

本版微信群
加好友,备注ck
拉您进交流群
GMT+8, 2025-12-25 13:33