r - 如何在时间序列预测中显示来自多个模型的测试数据的预测

Question

我将 AirPassenger 数据拆分为 train 和 test，在 train 上拟合三个不同的指数平滑模型，然后在 test 上进行预测。我需要的是在测试数据上绘制所有模型的预测结果以及原始数据。任何人都可以帮助将它们全部绘制在一个情节上吗？提前非常感谢。

train <- window(AirPassengers, end=1957)
test <- window(AirPassengers, start=1958)
fc1 <- ses(train, h=5)
fc2 <- holt(train, h=5)
fc3 <- hw(train, seasonal='additive')

autoplot(AirPassengers)+??????

标签： rtime-seriesforecasting

Answer 1

尝试这个：

AP <- cbind(AirPassengers, train, test, 
        as.ts(fc1)[, 1], as.ts(fc2)[, 1], as.ts(fc3)[, 1])
autoplot(AP)