下面是我的代码，其中包含屏幕截图中的示例数据；因为我只得到了 21 到 33 的响应。我的要求是得到 34、35、36、37 的响应
样本数据
下面是R代码
线性曲线<-lm（月〜值，数据=数据）曲线响应<-cbind（预测（线性曲线，类型=“响应”））
计算接下来 5 个区间的线性曲线估计的预测值
机器算法验证
估计
预言
曲线拟合
非线性
2022-04-10 21:30:03
1个回答
您可以使用该predict函数在 R 中执行此操作。为方便起见，我使用 Month 作为预测变量，使用 Value 作为结果。向量new中是作为月份函数的预测值。另请参阅在回归线上显示投影值的图。
data=data.frame(Month=c(21:33), Value=c(6591.69, 6579.62, 7133.84, 6955.89, 7573.27, 7556.87, 7751.17, 8001.76, 8399.5, 8560.36, 8517.53, 8602.57, 8575.81))
attach(data)
fit1<-lm(Value~Month, data=data)
new<-predict(fit1, data.frame(Month=(c(34,35,36))))
plot(Value~Month, data, col="red", xlim=c(20,36), ylim=c(6000,10000))
abline(fit1, col="orange", lwd=2)
abline(v=c(34,35,36), lty=6)
points(34, new[1], col="blue")
points(35, new[2], col="blue")
points(36, new[3], col="blue")
其它你可能感兴趣的问题