虚拟代码:
library(ggplot2)
library(patchwork)
plot1 <- mpg %>% ggplot()
plot2 <- mpg %>% ggplot()
plot3 <- mpg %>% ggplot(aes(cyl, displ)) +
geom_point(aes(colour = manufacturer)) +
guides(colour=guide_legend(ncol=4))
(plot1 + plot2) / plot3
我不是在寻找一个组合的传说,而是看起来像:
传说被“考虑”为情节的一部分。我试过用theme()
and添加边距,plot_spacer()
但这并不是我想要的。这就是我得到的: