比如这个普普通通的柱状图:

    07. 拼图的图例设置技巧 - 图1

    其实它本来是这个样子的:

    07. 拼图的图例设置技巧 - 图2

    我们可以使用plot_layout 对patchwork 拼图后的内容统一设置图例:

    1. p <- wrap_plots(p2, p1, nrow = 2, heights = c(1, 11))
    2. p <- p + plot_layout(guides = 'collect')
    3. p