使用 facet_wrap 时订购/放置空刻面

Question

考虑下面的分面图，它以 2x2 的排列方式绘制了 3 个分面。空白面在右下角。

library(ggplot2)
ggplot(mtcars) + 
  aes(x = wt, y = mpg) + 
  geom_point() + 
  facet_wrap(~factor(cyl), ncol = 2)

我想生成一个在顶行具有空白面的图，例如如下：

有什么办法可以做到这一点，而不用弄乱 grobs 或 gtable？

Answer 1

facet_wrap 有一个选项as.table。来自文档：

如果默认值为 TRUE，则分面的布局类似于右下角的最高值的表格。如果为 FALSE，则分面的布局类似于右上角的最高值。

如果你设置as.table = F，你会在右上角得到一个空白，但是现在面板的顺序很尴尬；他们会像

8 (blank)
4    6

要获得您想要的订单，请进行一些预处理。

如果你反转因子水平，你会得到一个布局

4 (blank)
8    6

顺序归结为左下、右下、左上、右上。

根据您希望它们的排列方式，您可能必须手动对构面级别进行排序，除非在您的完整项目中还有一些其他逻辑可以组合在一起。我在这里用forcats::relevel手动完成了。

library(dplyr)
library(ggplot2)

mtcars %>%
  mutate(cyl = as.factor(cyl) %>%
           forcats::fct_relevel("6", "8", "4")) %>%
  ggplot(aes(x = wt, y = mpg)) +
  geom_point() +
  facet_wrap(vars(cyl), ncol = 2, as.table = F)

^{由reprex package (v0.3.0) 于 2019 年 6 月 4 日创建}