如何在 R 中使用 ggplot2 创建截距等于 1 的散点图?
要使用 ggplot2 创建截距等于 1 的散点图,我们可以使用 geom_abline 函数,但我们需要为 x 轴和 y 轴的值传递合适的限制。例如,如果我们在数据框 df 中有两列 x 和 y,并且两列的范围都从 0 到 5 开始,则可以创建截距等于 1 的散点图,如下所示:
ggplot(df,aes(x,y))+geom_point()+geom_abline(intercept=1)+lims(x=c(0,5),y=c(0,5))
示例
考虑以下数据框:
x<-rnorm(20,5,1.12) y<-rnorm(20,1,0.035) df<-data.frame(x,y) df
输出
x y 1 2.687278 0.9948582 2 4.410082 0.9646977 3 1.985577 0.9691989 4 8.218845 1.0174078 5 5.942984 0.9926087 6 4.346328 1.0340842 7 5.674543 0.9684308 8 6.138125 0.9891907 9 4.392059 0.9342166 10 8.028985 0.9871115 11 5.184612 1.0310949 12 3.896205 0.9636961 13 4.500758 0.9725633 14 6.950320 1.0140455 15 6.640275 0.9414716 16 7.071293 1.0262039 17 5.675679 1.0348059 18 4.104087 1.0214097 19 4.254315 0.9187824 20 4.585728 1.0420679
加载 ggplot2 包和截距等于 1 的回归线的散点图:
示例
library(ggplot2) ggplot(df,aes(x,y))+geom_point()+geom_abline(intercept=1)+lims(x=c(0,9),y=c(0,2))
输出
广告