使用 R 中的 ggplot2 在单个图中创建多条回归线。

Z时代
2024-01-10
分类：综合

要使用 ggplot2 在单个图中创建多条回归线，我们可以使用 geom_jitter 函数和 geom_smooth 函数。geom_smooth 函数将帮助我们使用不同颜色的不同回归线， geom_jitter 将区分点。

查看下面的示例以了解如何完成。

示例

以下代码段创建了一个示例数据框 -

x1<-rpois(20,1)
y1<-rpois(20,5)
x2<-rpois(20,2)
y2<-rpois(20,8)
x3<-rpois(20,2)
y3<-rpois(20,4)
df<-data.frame(x1,y1,x2,y2,x3,y3)
df

创建以下数据框

x1 y1 x2 y2 x3 y3

1 2 2 0 6 1 6

2 3 4 0 9 1 7

3 2 4 3 7 2 3

4 0 12 2 11 0 1

5 0 2 0 6 1 1

6 1 7 2 7 1 3

7 0 4 0 4 1 5

8 0 3 2 5 0 1

9 1 4 3 3 0 9

10 0 2 0 8 3 5

11 0 7 4 11 2 4

12 0 4 3 8 2 1

13 0 6 0 6 2 4

14 1 6 1 9 2 2

15 2 3 1 9 6 2

16 1 3 1 10 5 2

17 0 5 1 8 2 6

18 1 2 4 7 2 4

19 0 5 2 11 0 7

20 2 8 4 8 2 4

要加载 ggplot2 包并在上面创建的数据框的单个图中为多个模型创建回归线，请将以下代码添加到上面的代码段 -

x1<-rpois(20,1)
y1<-rpois(20,5)
x2<-rpois(20,2)
y2<-rpois(20,8)
x3<-rpois(20,2)
y3<-rpois(20,4)
df<-data.frame(x1,y1,x2,y2,x3,y3)
library(ggplot2)
ggplot(df)+geom_jitter(aes(x1,y1),colour="red")+geom_smooth(aes(x1,y1,col="red"
),method="lm",se=FALSE)+
+
geom_jitter(aes(x2,y2),colour="green")+geom_smooth(aes(x2,y2,col="green"),metho
d="lm",se=FALSE)+
+
geom_jitter(aes(x3,y3),colour="blue")+geom_smooth(aes(x3,y3,col="blue"),method=
"lm",se=FALSE)
`geom_smooth()` using formula 'y ~ x'
`geom_smooth()` using formula 'y ~ x'
`geom_smooth()` using formula 'y ~ x'