如何使用 R 上的评分在 R

如何解决如何使用 R 上的评分在 R

我想查看第 1 个月和第 17 个月之间的百分比（百分比列）：

max_index_mois 列表示我有 17 个真实的月份，其余所有月份 (18:120) 随机预测会减少。

这个想法是删除从 18 到 120 的所有百分比值，并用线性回归或指数回归替换它们。

我确实找到了一种方法来进行回归：

exponential.model <- lm(log(Y)~ X,data = tc1[1:17,])   
model <- lm(Y~ X,data = datai[1:17,])  
#exponential.modeli <- lm(log(data[1:17,"Y"])~ datai[1:17,"X"])
newvalue <- data.frame(seq(18,120,1))
colnames(newvalue) <- "X"
ypred <- exp(predict(exponential.model,newvalue))

其中 df 数据包含 X : 1:120 和 Y 百分比，从 0 到 1，呈指数递减。

tc1 是您在本段下方看到的数据框的名称。

但是，我不能使用摘要进行评分，因为当我有 17 个第一分的百分比为 100% 的情况时，R 无法为模型评分并应用指数下降。

我的问题是： 我如何获得 17 个前点以在线性和指数拟合之间进行 R² 比较？让 R 做一个选择？

例如： R拿下前17分 他做了一个线性回归，得到 0.80 R² 他做了一个指数计算，得到 0.95 R²

然后选择指数模型来预测下一个值（18 到 120）。