forecast = forecast.Arima(model,h=4)
upper = ts(forecast$upper[,2], start=c(2016,12), frequency = 12)
lower = ts(forecast$lower[,2], start=c(2016,12), frequency = 12)
forecasted = forecast$mean
plot(cbind(window(manu, start=c(2015,12), end=c(2017,03), frequency=12),
upper, lower, forecasted), plot.type="single",
col=c("red","black","black","green"))
这是我现在正在使用的代码，而不是说2016年4月，它说2016.4。我试图使用我发现的命令剥离轴，但它似乎不允许它。有什么想法吗？