R预测自动绘图或hchart

Question

希望针对每个-煮熟的市场和市场-做多个Arima时间序列图，如下图所示。 尝试了自动绘图和hchart，但都无法正常工作。 请指教和协助。 任何帮助将不胜感激。

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

autoplot(forecast1)
hchart(forecast1)

Answer 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))

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