library("forecast")
X2371 <- read_excel("C:/Users/user/Desktop/2371.xlsx")
View(X2371)
data2371<-X2371[,5]
data2371_ts <- ts(data2371, start=c(1886), frequency=1)
plot.ts(data2371_ts)
data2371_diff <- diff(data2371_ts, differences = 1)
plot.ts(data2371_diff)
data2371_diff2 <- diff(data2371_ts, differences = 2)
plot.ts(data2371_diff2)
auto.arima(data2371_diff2)
(data2371_arima <- arima(data2371_ts, order = c(3, 1, 1)))
请问各位高手
要预测接下来10期的code应该如何修正
已经打了一整晚想不出来哪里有问题....
也有参考网络上2位作者的code格式也都一样,但我的就是跑不出来
谢谢各位高手

假设m是auto.arima()的回传物件，则可使用predict (m,n.ahead=10) 取得额外往后预测10次的结果，注意它会是个list，有$pred和$se。细节可看 ?predict.Arima