[英]R Holt-Winters forecasting train/test
我正在寻找一个简单的示例(或链接到一个示例),该示例使用基本Holt-Winters或R中预测包中的一个来在与预测相同的范围内绘制实际值。
我已经看到了很多示例,这些示例显示了实际值/拟合在一起,或者实际值“跟随”了预测,但是我找不到具有实际值/预测值一起运行的代码示例。
我这样做的原因是要使用实际值(火车)的子集创建预测,然后将整个数据集放入其中,以便可以显示预测的实际效果。 希望这是有道理的,并预先感谢您的任何帮助!
使用dygraph包找到了一个非常简单的解决方案。 这可能很简单,但是在其他新手遇到并尝试执行相同操作的情况下,请不要回答我的问题/答案:
我从此链接(第二张图)中获取了代码: https : //rstudio.github.io/dygraphs/gallery-upper-lower-bars.html
并修改为:
library(dygraphs)
library(magrittr)
#hw <- HoltWinters(ldeaths)
hw <- HoltWinters(window(ldeaths, 1974, c(1976,12))) #subset timeseries to first 3 years in ldeath (train data)
p <- predict(hw, n.ahead = 36, prediction.interval = TRUE) #predict for the last 3 years in ldeath (test data)
all <- cbind(ldeaths, p) #we add full ldeaths into graph to see test data (1977,78,79) against the prediction
dygraph(all, "Deaths from Lung Disease (UK)") %>%
dySeries("ldeaths", label = "Actual") %>%
dySeries(c("p.lwr", "p.fit", "p.upr"), label = "Predicted")
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.