使用R在散点图中添加一条线

Question

plot(c.6,d.6, xlab="A55 ", ylab="A41", main="H3",cex.main=1)
abline(lm(d.6 ~ c.6),col="red") 

此代码工作正常，但我想再添加两行：一行y = x + 2，x = y + 2

我想添加这两行来显示那些不属于行的值。

Answer 1

您可以使用abline功能：

abline(2, 1)
abline(-2, 1)

请参阅?abline：

  

abline（a = NULL，b = NULL，h = NULL，v = NULL，reg = NULL，          coef = NULL，untf = FALSE，...）

     

参数：

     

a，b - 截距和斜率，单值。

因此，对于特定的回归，您可以使用以下内容：

abline(
 coef(lm(d.6 ~ c.6))[1] + 2,
 coef(lm(d.6 ~ c.6))[2]
 )
abline(
 coef(lm(d.6 ~ c.6))[1] - 2,
 coef(lm(d.6 ~ c.6))[2]
 )