R 霍尔特温预报

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

我有一个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,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):优化困难:错误:异常终止