r - ggplot2 如何显示具有相同 y 但不同 x 的两条不同回归线

Question

假设我有以下使用基本绘图函数的代码。

plot(mydata$x1,mydata$y,xlab="x1",ylab="y",type="n")

abline(lm(y~x1,data=mydata))`

abline(lm(y~x2,data=mydata),lty=2)'

这将在单个图中显示两条回归线，一条是 y=p*x1，一条是 y=p*x2(p 是参数)

由于我对相同的 y 使用不同的 x，如何使用 ggplot2 一起显示两条回归线？ 我尝试定义两个geom_smooth。但结果不正确。

geom_smooth(aes(y=y,x=x1))+gemo_smooth(aes(y=y,x=x2))

Answer 1

• 指定方法='lm'
• 正确拼写 geom_smooth。

以下作品:

set.seed(1)
d <- data.frame(x1=runif(10),x2=runif(10),y=runif(10))
ggplot(d, aes(y=y)) + 
    geom_point(aes(x=x1)) + 
    geom_smooth(aes(x=x1),method='lm') +  
    geom_smooth(aes(x=x2),method='lm')