数据为对数差分后的股票收盘价,即日收益率。
之前的代码如下:
> library(rugarch)
> model<-ugarchspec(variance.model = list(model="sGARCH",garchOrder=c(1,1)), #方差方程为GARCH(1,1)
mean.model = list(armaOrder=c(0,0),include.mean=FALSE), #均值方程为ARMA(0,0)
distribution.model = "norm") #服从正态分布
> modelfit<-ugarchfit(spec=model,data=r.stock) #r.stock是股票日收益率数据
> plot(modelfit)
> ugarchforecast(modelfit,n.ahead=26,data=r.stock)
得到结果为:
> ugarchforecast(modelfit,n.ahead=26,data=r.stock)
*------------------------------------*
* GARCH Model Forecast *
*------------------------------------*
Model: sGARCH
Horizon: 26
Roll Steps: 0
Out of Sample: 0
0-roll forecast [T0=1206-01-01]:
Series Sigma
T+1 0 2.616
T+2 0 2.598
T+3 0 2.582
T+4 0 2.567
T+5 0 2.552
预测图如下(左图为均值预测,右图为方差预测):
GARCH(1,1)模型拟合图如下:
所以想问一下怎么做出具体的有趋势的预测图呢?谢谢啦!


雷达卡



京公网安备 11010802022788号







