r - 控制 facet_grid、ggplot 中的间距和标签

Question

我正在尝试控制用 facet_grid 形成的 ggplot 图中的间距和标签。我进行了一些研究，并使用了我认为至少可以帮助我实现第一个目标的论点，但结果不是我所期望的。

对于一个可重现的示例，我使用 mtcars 数据集（基础 R），并提供了代码输出的图像，其中我指出了我想要更改的内容。

您的建议将不胜感激。

data(mtcars)
setDT(mtcars)
mtcars[, ":="(vs = as.factor(vs), am = as.factor(am), gear = as.factor(gear), carb = as.factor(carb))]

ggplot (mtcars,
         aes(x= disp , y = hp , colour = carb)) +
  geom_point (size = 2) + facet_grid ( gear ~ vs * am , margins = TRUE) +
  xlab('disp') + ylab('hp') +
  theme(panel.spacing.x=unit(2, "lines"), panel.spacing.y=unit(2, "lines"))+
  theme_economist()  + theme(plot.margin = unit(c(1, 1, 1, 1), "lines"))

Answer 1

您可以使用参数panel.spacingin定义面板之间的空间theme。theme_economist正在改变它。默认情况下，面板之间有空格。

您还可以添加 labeller 函数label_both，以便在每个面板标签上具有变量名称。

ggplot (mtcars,
        aes(x= disp , y = hp , colour = carb)) +
  geom_point (size = 2) + facet_grid ( gear ~ vs * am , margins = TRUE, labeller = label_both) +
  xlab('disp') + ylab('hp') +
  theme(panel.spacing.x=unit(2, "lines"), panel.spacing.y=unit(2, "lines"))+
  theme_economist() + theme(plot.margin = unit(c(1, 1, 1, 1), "lines"), panel.spacing=unit(2,"lines"))