ggplot facet_wrap不同的主题

Question

我正在寻找一种在同一行facet_wrap中%>%个不同主题的方法，以获得类似的东西

有什么方法可以做类似的事情而不必做

fig1 = mtcars %>% filter(am == 1) %>%
  ggplot(aes(wt, mpg)) +
  geom_point() + 
  theme_bw(base_size = 15) + ggtitle('Theme A')

fig2 = mtcars %>% filter(am == 0) %>%
  ggplot(aes(wt, mpg)) +
  geom_point() + 
 theme_minimal(base_size = 15) + ggtitle('Theme B')

grid.arrange(fig1,fig2, ncol = 2)

是否可以在同一行代码中为facet参数显示不同的主题？

否则，即使仅显示facet参数的不同颜色背景也将有所帮助。

Answer 1

我认为构面具有相​​同的主题（构面之间唯一改变的地方应该是一列，该列根据自由/固定/等设置来确定哪些数据到达何处以及轴）。

正如@ sam81所建议的那样，此answer是哈德利（Hadley）的comment的一个很好的黑客解决方案