R语言ggplot2拼图包patchwork安装使用

更新时间：2022年06月24日 10:58:17 作者：Hayley笔记

这篇文章主要介绍了R语言ggplot2拼图包patchwork安装使用的图文示例详解，有需要的朋友可以借鉴参考下，希望能够有所帮助，祝大家多多进步，早日升职加薪

引言

patchwork是基于ggplot2的拼图包，因为ggplot2本身没有强大的拼图语法，而一般使用的gridExtra与cowplot的拼ggplot2图形都存在不少问题。

我关注这个包蛮久了，现在Github上的Star数已经远超大部分的R包，但似乎还没有发布到CRAN。我的工作看似跟作图相关，写的博文大多数也如此，但实际对图形的掌控力并不咋的，所以还是要多多学习。

下面进入正题，掌握好ggplot2与patchwork的基本用法，一般的图形都可以搞定了，并必要搞的很复杂。解决问题是关键，认真工作也是关键，画图看起来是，其实不是。

安装

# 需要提取安装好devtools包，
# 如果你解决安装和载入包很麻烦，可以试试pacman包，我在简书写了介绍和简单使用
devtools::install_github("thomasp85/patchwork")

导入：

p_load(patchwork)
# 或
# library(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

我们不用创建对象，也可以像ggplot2本身使用一样相加。

ggplot(mtcars) +
  geom_point(aes(mpg, disp)) +
  ggplot(mtcars) + 
  geom_boxplot(aes(gear, disp, group = gear))

另外，可以使用布局函数plot_layout对拼接细节进行更细致地指定，像每个图的范围，图形的排列。

p1 + p2 + plot_layout(ncol = 1, heights = c(3, 1))

如果你想要在图形之间添加一些空间，可以使用plot_spacer()填充一个空白格。

p1 + plot_spacer() + p2

增加花括号的使用进行嵌套可以布置更复杂的图形：

p3 <- ggplot(mtcars) + geom_smooth(aes(disp, qsec))
p4 <- ggplot(mtcars) + geom_bar(aes(carb))
p4 + {
  p1 + {
    p2 +
      p3 +
      plot_layout(ncol = 1)
  }
} +
  plot_layout(ncol = 1)
## `geom_smooth()` using method = 'loess' and formula 'y ~ x'

括号也是可以的：

p3 <- ggplot(mtcars) + geom_smooth(aes(disp, qsec))
p4 <- ggplot(mtcars) + geom_bar(aes(carb))
p4 + (
  p1 + (
    p2 +
      p3 +
      plot_layout(ncol = 1)
  )
) +
  plot_layout(ncol = 1)
## `geom_smooth()` using method = 'loess' and formula 'y ~ x'

高级特性

除了将图形添加到一起，patchwork定义了一些有意思的操作符，，简化了上面的嵌套语法。-操作符将左右两边的对象放在同一个嵌套层，而不是像+号把右边放入左边的嵌套层。

p1 + p2 + p3 + plot_layout(ncol = 1)
## `geom_smooth()` using method = 'loess' and formula 'y ~ x'

p1 + p2 - p3 + plot_layout(ncol = 1)
## `geom_smooth()` using method = 'loess' and formula 'y ~ x'

现在p1+p2与p3在同一嵌套层。

|与/操作符可以用来水平和垂直布局。

(p1 | p2 | p3) /
      p4
## `geom_smooth()` using method = 'loess' and formula 'y ~ x'

子图多的时候同时修改图形比较麻烦，patchwork提供了*与&用来简化代码，它们都可以将同一个操作应用到所有图形。

(p1 + (p2 + p3) + p4 + plot_layout(ncol = 1)) * theme_bw()
## `geom_smooth()` using method = 'loess' and formula 'y ~ x'

需要注意*只会应用到当前嵌套层。

p1 + (p2 + p3) + p4 + plot_layout(ncol = 1) & theme_bw()
## `geom_smooth()` using method = 'loess' and formula 'y ~ x'

&可以用递归的方式应用到所有层面。

以上就是R语言ggplot2拼图包patchwork安装使用的详细内容，更多关于R语言ggplot2拼图包patchwork的资料请关注脚本之家其它相关文章！

您可能感兴趣的文章:

R语言实现在循环中输出图片的操作
这篇文章主要介绍了R语言实现在循环中输出图片的操作，具有很好的参考价值，希望对大家有所帮助。一起跟随小编过来看看吧
2021-04-04
R语言数据类型深入详解
这篇文章主要介绍了R语言数据类型深入详解,内容对于数据类型讲解的很详细,有对于R语言感兴趣的同学可以多学习下
2021-03-03
R语言格式化输出sprintf实例讲解
这篇文章主要介绍了R语言格式化输出sprintf实例讲解，文中代码实例讲解的很清楚，有需要的同学可以研究下
2021-03-03
R语言-使用ifelse进行数据分组
这篇文章主要介绍了R语言-使用ifelse进行数据分组，具有很好的参考价值，希望对大家有所帮助。一起跟随小编过来看看吧
2021-04-04
R语言-使用快捷键快速注释的实现
这篇文章主要介绍了R语言-使用快捷键快速注释的实现方式，具有很好的参考价值，希望对大家有所帮助。一起跟随小编过来看看吧
2021-04-04
R语言关于随机森林算法的知识点详解
在本篇文章里小编给大家整理的是一篇关于R语言关于随机森林算法的知识点详解内容，有兴趣的朋友们可以跟着学习下。
2021-05-05
Rstudio中安装package出现的问题及解决
这篇文章主要介绍了Rstudio中安装package出现的问题及解决方案，具有很好的参考价值，希望对大家有所帮助。一起跟随小编过来看看吧
2021-04-04
R语言boxplot函数深入讲解
这篇文章主要介绍了R语言boxplot函数深入讲解，文中图文讲解的很透彻，有感兴趣的同学可以研究下
2021-03-03
R语言中时间序列分析浅析
在本篇文章里小编给大家整理的是一篇关于R语言中时间序列分析浅析内容，有需要的朋友们跟着学习下。
2021-05-05
使用R语言填补缺失值的方法
这篇文章主要介绍了使用R语言填补缺失值的方法,本文给大家介绍的非常详细，对大家的学习或工作具有一定的参考借鉴价值，需要的朋友可以参考下
2021-03-03