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 所建议的，这个答案是一个很好的破解解决方案，基于hadley 的评论