在R语言中，当我们需要将多个图形组合成一个整体进行展示时，可以使用`grid.arrange()`函数（来自`gridExtra`包）或`patchwork`包来进行操作。
1. **grid.arrange()**：
`grid.arrange()`函数是`gridExtra`包中的一个重要工具，它允许我们将多个ggplot对象以网格的形式进行排列组合。例如：
```r
library(gridExtra)
# 创建两个ggplot对象
p1 <- ggplot(mtcars, aes(x=wt, y=mpg)) + geom_point()
p2 <- ggplot(mtcars, aes(x=disp, y=hp)) + geom_point()
# 使用grid.arrange()将两个图组合在一起，水平排列
grid.arrange(p1, p2, ncol = 2)
```
在这个例子中，`ncol = 2`表示我们希望这两幅图在一行内并排显示。同时，你还可以通过设置`nrow`参数来控制行数，或者直接指定每个图的位置。
2. **patchwork包**：
`patchwork`包提供了一种更为灵活和直观的方式来组合ggplot对象。它的设计思路是将各个图视为可以相加、相乘的元素，从而实现复杂的布局。
```r
library(patchwork)
# 同样创建两个ggplot对象
p1 <- ggplot(mtcars, aes(x=wt, y=mpg)) + geom_point()
p2 <- ggplot(mtcars, aes(x=disp, y=hp)) + geom_point()
# 使用patchwork包将两个图组合在一起，同样为水平排列
(p1 + p2) / plot_layout(ncol = 2)
```
在patchwork中，"+"号用于将图形垂直堆叠，"%"号用于将图形按比例缩放，"/"号用于将图形水平排列。这种方式更接近于数学符号的表达，使得代码可读性更强，也更容易构建复杂的图形布局。
