R中的下一步预测功能

Question

以下是我的部分代码。数据帧结束于139，我尝试使用线性回归预测140 ^th Y值，但它不会产生任何结果。

glreg3 <- lm(Y ~ Ypast1+Ypast2+Ypast3+Ypast4+Ypast12+Ypast13+summer+spring+fall+winter+t, data=YX2)

tf <- data.frame(t=140)

predict(glreg3, newdata=YX2$tf, interval="prediction", level=.95)