(1)如果我用VAR模型算出最优滞后阶数是5,是否应该将pitaya1.bekk = mgarch(pitaya1~-1, ~bekk(1,1))改为pitaya1.bekk = mgarch(pitaya1~-5, ~bekk(1,1))?
(2)对输出的结果有一些不明白,因为在文献中一些作者做出来的矩阵元素是2*2的,但似乎按照您的程序做出来的不止这么多系数,请问多出来的系数是什么呢?
Estimated Coefficients:
--------------------------------------------------------------
Value Std.Error t value Pr(>|t|)
A(1, 1) 0.06948 1.353896 0.05132 0.959191
A(2, 1) -1.16463 24.974187 -0.04663 0.962916
A(2, 2) 0.48384 57.944159 0.00835 0.993357
ARCH(1; 1, 1) 0.28194 0.175921 1.60263 0.112770
ARCH(1; 2, 1) 2.39652 1.225028 1.95630 0.053753
ARCH(1; 1, 2) 0.02337 0.021390 1.09280 0.277608
ARCH(1; 2, 2) 0.43397 0.141311 3.07104 0.002874
GARCH(1; 1, 1) 0.90623 0.086039 10.53274 0.000000
GARCH(1; 2, 1) 0.03753 0.634383 0.05917 0.952960
GARCH(1; 1, 2) -0.01875 0.009676 -1.93759 0.056033
GARCH(1; 2, 2) 0.90830 0.069985 12.97859 0.000000
(3)看文献中的过程,还要做模型标准化残差检验和波动溢出效应的Wald检验,这些我搜索了论坛上的帖子,也发现了一些编程命令,但仍然不能确定该怎么样来做,以及Q值怎么取?
因为之前实在没接触过这个模型,真的一片空白,在论坛上找了三天多了,看见epho老师回答的许多问题,自己尝试后实在没有办法,只有向各位朋友和epho老师 求助,希望能得到帮助,不甚感激!
再次感谢各位的帮助,祝您好心情!
附件里是我的数据,也是用上次epho老师帮助别人的帖子回答里找到的,代入了自己的数据:
当时epho老师 给的程序代码是:
module(finmetrics)
data=importData(file="pitaya1.xls", type="EXCEL")
pitaya1=cbind(data$v1,data$v2)
pitaya1.bekk = mgarch(pitaya1~-1, ~bekk(1,1))
summary(pitaya1.bekk)
如果有会的朋友希望不吝赐教,非常感谢各位!