0

想为每个做多个 arima 时间序列图 - 熟食和市场 - 如下图所示。已经尝试过 autoplot 和 hchart 但两者都不起作用。请提供建议和帮助。任何帮助将不胜感激。

forecast1<-ts(lapply(arima, function(x) forecast(auto.arima(x), level=95)))

autoplot(forecast1)
hchart(forecast1)

数据:

4

1 回答 1

1

在使用预测算法之前,我采取了将数据转换为时间序列的步骤。然后打印图表只需在生成的新列表上使用 apply 即可。请看下面的代码。

Year <- seq(2012, 2018)
Cooked <- c(157.4, 157.2, 168.8, 192.3, 201.8, 233.4, 241.2)
Market <- c(51.7, 44.9, 49.5, 53.6, 57.2, 54.1, 53.5)
df <- as.data.frame(cbind(Year, Cooked, Market))
ts_df <- ts(df[, -1], start = 2012, frequency = 1)

library(forecast)
forecast1<-lapply(ts_df, function(x) forecast(auto.arima(x), level=95))

lapply(forecast1, function(x) autoplot(x))

我建议在以后的问题中,将数据放在一个类似的脚本中,以帮助我们帮助您。

于 2018-11-09T16:42:31.473 回答