您现在的位置是:首页 > 编程 > 

R语言基于ARMA

2025-07-23 14:44:10
R语言基于ARMA 原文链接:/?p=186本文显示了如何基于潜在的ARMA-GARCH模型(当然也涉及更广泛意义上的QRM)来拟合和预测风险价值(VaR)。从ARMA-GARCH过程模拟(log-return)数据我们考虑使用t 分布的ARMA(1,1)-GARCH(1,1)过程。模拟一个序列(用于说明目的)。代码语言:javascript代码运行次数:0运行复制 nu <- fi

R语言基于ARMA

原文链接:/?p=186

本文显示了如何基于潜在的ARMA-GARCH模型(当然也涉及更广泛意义上的QRM)来拟合和预测风险价值(VaR)

从ARMA-GARCH过程模拟(log-return)数据

我们考虑使用t 分布的ARMA(1,1)-GARCH(1,1)过程。

模拟一个序列(用于说明目的)。

代码语言:javascript代码运行次数:0运行复制
 nu <-   fixed.p <- list(mu = 0, #   mu (截距)
                ar1 = 0.5, #   phi\_1 (AR(1) 参数 of mu\_t)
                ma1 = 0., #   theta\_1 (MA(1) 参数 of mu\_t)
                omega = 4, #   alpha_0 (截距)
                alpha1 = 0.4, #   alpha\_1 (GARCH(1) 参数 of sigma\_t^2)
                beta1 = 0.2, #   beta\_1 (GARCH(1) 参数 of sigma\_t^2)
                shape = nu) #  armaOrder <- c(1,1) # ARMA 参数garchOrder <- c(1,1) # GARCH 参数varModel <- list(model = "sGARCH", garchOrder = garchOrder)
spec <- ugarchspec(varModel,  = list(armaOrder = armaOrder),
                   fixed.pars = fixed.p,  = "std") # t 标准残差

作为一个完整性检查,让我们绘制模拟序列,条件标准偏差和残差。

代码语言:javascript代码运行次数:0运行复制
plot(X,   type = "l", xlab = "t", ylab = expression(X\[t\]))

plot(sig, type = "h", xlab = "t", ylab = expression(sigma\[t\]))
代码语言:javascript代码运行次数:0运行复制
plot(eps, type = "l", xlab = "t", ylab = expression(epsilon\[t\]))
将ARMA-GARCH模型拟合到(模拟)数据

拟合ARMA-GARCH模型 。

让我们再考虑一些健全性检查。

代码语言:javascript代码运行次数:0运行复制
## 拟合 ARMA(1,1)-GARCH(1,1) model
spec <- ugarchspec(varModel,  = list(armaOrder = armaOrder),
                    = "std") #  
fit <- ugarchfit(spec, data = X) # fit

##  
mu. <- fitted(fit) # 拟合 hat{mu}\_t (= hat{X}\_t)
sig. <- sigma(fit) # 拟合 hat{sigma}_t

##  
stopifnot(((mu.),  fit@fit$fitted.values),
          ((sig.), fit@fit$sigma))
计算VaR时间序列

计算VaR估计值。请注意,我们也可以在这里使用基于GPD的估算模型。

Backtest VaR估计值

让我们回测VaR的估计。

代码语言:javascript代码运行次数:0运行复制
## \[1\] 10
## \[1\] 12
## \[1\] "Correct Exceedances"
## \[1\] "Fail to Reject H0"
## \[1\] "Correct Exceedances & Independent"
## \[1\] "Fail to Reject H0"
基于拟合模型预测VaR

现在预测VaR。

模拟X_t的未来轨迹并计算相应的VaR

模拟序列,估计每个模拟路径的VaR(注意quantile()这里不能使用,因此我们必须手动构建VaR)并计算VaR _alpha的bootstrap置信区间。

结果对比

最后,我们显示所有结果。

非常感谢您阅读本文,有任何问题请在下面留言!本文参与 腾讯云自媒体同步曝光计划,分享自。原始发表:2025-01-21,如有侵权请联系 cloudcommunity@tencent 删除var模型数据listmodel

#感谢您对电脑配置推荐网 - 最新i3 i5 i7组装电脑配置单推荐报价格的认可,转载请说明来源于"电脑配置推荐网 - 最新i3 i5 i7组装电脑配置单推荐报价格

本文地址:http://www.dnpztj.cn/biancheng/1141699.html

相关标签:无
上传时间: 2025-07-19 07:38:58
留言与评论(共有 8 条评论)
本站网友 金第梦想山
3分钟前 发表
data = X) # fit ## mu. <- fitted(fit) # 拟合 hat{mu}\_t (= hat{X}\_t) sig. <- sigma(fit) # 拟合 hat{sigma}_t ## stopifnot(((mu.)
本站网友 深银信投资集团
21分钟前 发表
# phi\_1 (AR(1) 参数 of mu\_t) ma1 = 0.
本站网友 摆龙门阵
4分钟前 发表
请注意
本站网友 八个月宝宝发育标准
13分钟前 发表
# alpha\_1 (GARCH(1) 参数 of sigma\_t^2) beta1 = 0.2
本站网友 保健食品管理
7分钟前 发表
我们显示所有结果
本站网友 款冬花的功效与作用
6分钟前 发表
fit@fit$fitted.values)
本站网友 mikibana
16分钟前 发表
我们也可以在这里使用基于GPD的估算模型