添加拟合二次曲线

Question

我正在尝试将拟合的二次曲线添加到绘图中.

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

显示的回归是线性的而不是二次的,我得到这样的信息:

Message d'avis:在abline(lm(data~factor + I(factor ^ 2)),col = palette [iteration]):利用des deux premiers des 3 systemsderégression

意思是:

使用3个回归系数中的前2个

当只运行该lm()功能时,我没有收到任何消息.

这是一个示例数据:

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

Answer 1

而不是使用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")