R包-patchwork拼图包

产生了各种图表，用最简单的代码组合各图为整体，并作统一修改，就是patchwork拼图包的强大之处。简单介绍patchwork包的主要功能，以备需要之时参考。

原文参考

主要功能

（1）支持直接p1+p2拼图，比任何一个包都简单

（2）复杂的布局代码易读性更强

（3）可以给子图添加标记（例如ABCD， I II III IV 这样）

（4）可以统一修改所有子图

（5）可以将子图的图例移到一起，整体性特别好

简单实例

library(ggplot2)
library(patchwork)

p1 <- ggplot(mtcars) + geom_point(aes(mpg, disp))
p2 <- ggplot(mtcars) + geom_boxplot(aes(gear, disp, group = gear))

p1 + p2

p3 <- ggplot(mtcars) + geom_smooth(aes(disp, qsec))
p4 <- ggplot(mtcars) + geom_bar(aes(carb))

(p1 | p2 | p3) /
      p4

## 子图添加图例
p1 + p2 + p3 + 
  plot_annotation(tag_levels = 'I')

image.png

总之，patchwork的拼图语法简单，易读，而且能够统一对拼图完成修改，非常优秀实用的一个包。

官网链接

---

相关阅读
盘点R语言的那些拼图方法