p=23115
在这个文章中,我们演示了copula GARCH方法(一般情况下)。
1 模拟数据
首先,我们模拟一下创新分布。我们选择了一个小的样本量。...n.sim = n, # 模拟的路径长度
## 提取结果系列
X. <- fitted(X) # X\_t = mu\_t + eps_t (simulated process...- rep(nu., d) # 边缘自由度
est <- cbind(fitted = c(estimate, nu.), true = c(th, nu, nu.)) # 拟合与真实值
3 从拟合的时间序列模型进行模拟...()
sim(fit\[\[j\]\], n.sim = n, m.sim = 1,
并绘制出每个结果序列(XtXt)。...apply(sim,fitted(x)) # 模拟序列
plot(X.., type = "l")