如何在 R 中创建面间距离较大的散点图?
r programmingserver side programmingprogramming更新于 2025/4/9 15:07:17
默认情况下，使用 ggplot2 创建的面间距离/空间非常小，查看者单独阅读面时会感到有些不方便。因此，为了解决这个问题，我们可以增加面间空间，这可以借助主题函数来完成，如下例所示。
示例
以下代码片段创建了一个示例数据框 −
x<-rnorm(20)
y<-rnorm(20)
Group<-sample(c("Male","Female"),20,replace=TRUE)
df<-data.frame(x,y,Group)
df
输出
创建以下数据框 −
x y Group 1 1.2867663 0.55866491 Male 2 0.7391027 -0.34618436 Female 3 0.5235874 -0.74887181 Female 4 0.5888993 -0.68957351 Male 5 -0.3590756 0.75730314 Female 6 -0.5554565 -0.38544639 Male 7 0.4637831 -1.68509743 Male 8 -0.3665099 -0.26642702 Male 9 -0.4825639 0.63628373 Male 10 -1.1191989 1.55902395 Female 11 -0.5730155 0.04807617 Male 12 1.0237728 -0.84262752 Female 13 -1.2894423 1.97032059 Female 14 -0.6856492 -0.78864269 Male 15 -0.5171276 0.23602206 Female 16 -0.7189031 0.81558755 Female 17 1.4954506 -0.64333891 Female 18 -1.1988800 -0.07535623 Male 19 -0.8260068 0.73747420 Male 20 -2.0534583 -0.63682645 Female
要加载 ggplot2 包并在 x 和 y 之间创建点图，并使用 Group 列定义的方面，请将以下代码添加到上面的代码片段中 −
library(ggplot2) ggplot(df,aes(x,y,color=Group))+geom_point()+facet_grid(~Group)
输出
如果将上述所有代码片段作为单个程序执行，则会生成以下输出 −
若要创建 x 和 y 之间的点图，且面与 Group 列定义的距离较大，请将以下代码添加到上述代码片段中 −
ggplot(df,aes(x,y,color=Group))+geom_point()+facet_grid(~Group)+theme(panel.spacing=unit(3,"lines"))
输出
如果将上述所有代码片段作为单个程序执行，则会生成以下输出 −
