如何在R中向后移动时间序列预测？

Question

预测未来只是正常的编码，但有没有办法可以向后移动预测区间来检查预测区间是否太窄或太宽？

以下是示例代码：

library(forecast)
fit <- Arima(log(dat1$V2), c(1, 1, 1), include.constant=T)
plot(forecast(fit,h=30),include=100)

我想我可以在某个时间点剪切原始数据集并再次适合剪切文件，但是还有更方便吗？