r - 添加拟合的二次曲线

我正在尝试向曲线图添加拟合的二次曲线。

abline(lm(data~factor+I(factor^2)))

显示的回归是线性的而不是二次的，我得到以下信息:



意思是:



仅运行lm()函数时，我没有任何消息。

这是一个示例数据:

factor <- 1:7
data <- c(0.1375000,0.2500000,0.3416667,0.4583333,0.7250000,0.9166667,1.0000000)

最佳答案

不用 abline ，而是使用 fitted ，它为您提供一个与您输入的预测长度相同的向量:

fitted(lm(data~factor+I(factor^2)))
#         1         2         3         4         5         6         7
# 0.1248016 0.2395833 0.3699405 0.5158730 0.6773810 0.8544643 1.0471230

因此，类似:

plot(factor, fitted(lm(data~factor+I(factor^2))), type="l")

关于r - 添加拟合的二次曲线，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/14927004/