如何在R中创建散点图,并增大刻面之间的距离?


默认情况下,使用ggplot2创建的刻面之间的距离/空间非常小,查看者难以区分各个刻面。因此,为了解决这个问题,我们可以增加刻面之间的空间,这可以通过theme函数实现,如下例所示。

示例

以下代码片段创建一个示例数据框:

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"))

输出

如果您将上面给出的所有代码片段作为一个程序执行,它将生成以下输出:

更新于:2021年11月3日

81次浏览

启动您的职业生涯

通过完成课程获得认证

开始学习
广告