单细胞36计之12顺手牵羊---patchwork拼图

第十二计 顺手牵羊
顺手就牵了羊。比喻不费劲，乘机便得到的。现多指乘机拿走人家东西的偷窃行为。
此计指我方要善于捕捉时机，伺隙捣虚，变敌方小的疏漏而为我方小的得利。

patchwork的目标是使将单独的ggplots组合到同一图形中非常简单。因此，它尝试解决与API相同的问题gridExtra::grid.arrange()，cowplot::plot_grid`但使用的API会引发探索和迭代，并可以扩展为任意复杂的布局。

安装

您可以使用来从CRAN安装补丁程序install.packages('patchwork')`。另外，您可以使用devtools从github获取开发版本：

# install.packages("devtools")
devtools::install_github("thomasp85/patchwork")

基本例子

的用法patchwork很简单：只需将地块加在一起即可！

library(ggplot2)
library(patchwork)

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

p1 + p2

image

拼凑而成的样式为完全复杂的任意复杂布局提供了丰富的支持。例如，请查看以下易于阅读的代码，以便在第三个图的顶部嵌套三个图：

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

(p1 | p2 | p3) /
      p4

image