使用 R 中的 ggplot2 在单一绘图中创建多条回归线。
要使用 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'
输出
如果你将上面给出的所有代码段作为一个程序执行,它将生成以下输出 -
广告