R 霍尔特温预报
我有一个30天和30小时的除法,所以有720个值(24小时*30) 每个星期六和星期天,正如你所看到的,我在时间序列中有最低的值。(从星期五开始) 我将时间序列分为3周的“训练”和1周的第4周测试。 前3周采用Holtwiners方法,第4周进行预测,并将观测值与模拟值进行比较R 霍尔特温预报,r,time-series,prediction,holtwinters,R,Time Series,Prediction,Holtwinters,我有一个30天和30小时的除法,所以有720个值(24小时*30) 每个星期六和星期天,正如你所看到的,我在时间序列中有最低的值。(从星期五开始) 我将时间序列分为3周的“训练”和1周的第4周测试。 前3周采用Holtwiners方法,第4周进行预测,并将观测值与模拟值进行比较 Test<-function(ID,Unique,i){ DfIn<-ID$V4[1:552] DfReal<-ID$V4[553:720] x<-ts(data=DfIn,freq
Test<-function(ID,Unique,i){
DfIn<-ID$V4[1:552]
DfReal<-ID$V4[553:720]
x<-ts(data=DfIn,frequency=24)
HW<-HoltWinters(x,beta = FALSE)
Pred<-forecast.HoltWinters(HW,168)
print("Accuracy")
print(accuracy(Pred,DfReal))
Box1<-Box.test(Pred$residuals,type="Ljung-Box")
P<-Box1$p.value
return (P)
}
测试您可以尝试
x<-ts(data=DfIn,frequency=7*24)
x与编程相比,更多的是一个统计问题哇,它看起来比第一个好。我将结果发布在主帖子上。如果这回答了问题,有人愿意发布官方答案吗?@lukeA只有一件事,这样p值从~0.059到0.2430634。它会影响模型的重要性吗?我在Holtwiners中也得到了这个警告(x,beta=FALSE):优化困难:错误:异常终止