添加线/方程以散点图

时间:2012-12-12 02:16:46

标签: r linear-regression

我有3个模型,所有模型都很重要,我想用我的数据创建一个线性图。这就是我到目前为止所做的:

>morpho<-read.table("C:\\Users\\Jess\\Dropbox\\Monochamus\\Morphometrics.csv",header=T,sep=",")
> attach(morpho)
> wtpro<-lm(weight~pronotum)
> plot(weight,pronotum)
> abline(wtpro)

我尝试输入abline:

abline(lm(weight~pronotum))

我无法弄清楚我做错了什么。我想添加我的等式,我有我所有的系数,但无法超越线...我甚至开始思考也许我一路上搞砸了它仍然无法工作。是否有一个我错过的独立包裹?

2 个答案:

答案 0 :(得分:3)

尝试:

abline(coef(lm(weight~pronotum))  # works if dataframe is attached.

我尽量避免使用attach()。它会产生各种异常,随着您进行更多回归工作而增加。更好的是:

wtpro<-lm(weight~pronotum, data= morpho)
with( morpho ,  plot(weight,pronotum) )
abline( coef(wtpro) )

答案 1 :(得分:2)

Plot的格式为plot(x,y,...),看起来你已经先订购了因变量。容易犯错误。

例如:

设置一些数据

y <- rnorm(10)
x <- rnorm(10) + 5

将因变量放在x轴上的图不会显示回归线,因为它在可见平面之外。

plot(y,x)
abline(lm(y~x), col='red', main='Check the axis labels')

翻转plot命令中的变量。现在它将可见。

plot(x,y)
abline(lm(y~x), col='red', main='Check the axis labels')