ggplot2 的组合图（不在单个图中），使用 par() 或 layout() 函数 [复制]

ABS

使用ggplot2的组合图，可以将多个图形组合在一起，并在一个图形设备中显示。要实现这个目标，我们可以使用par()或layout()函数来设置图形的布局。

par()函数

par()函数是R中用于设置图形参数的函数。通过调用par()函数，我们可以设置图形设备的布局，包括行数和列数，以及每个图形的位置。例如，我们可以使用以下代码将图形设备的布局设置为2行2列，然后将四个图形绘制在不同的位置。

R
par(mfrow = c(2, 2))
plot(1:10)
plot(10:1)
plot(rnorm(100))
plot(runif(100))

在这个例子中，我们使用par(mfrow=c(2,2))将图形设备的布局设置为2行2列。然后，我们使用plot()函数绘制了四个不同的图形，这些图形将根据布局设置自动显示在正确的位置。

layout()函数

layout()函数是另一种用于设置图形布局的函数。与par()函数不同，layout()函数允许我们更灵活地控制每个图形的位置和大小。我们可以使用一个矩阵来指定图形的布局，其中矩阵的每个元素表示要在该位置绘制的图形。

以下是一个使用layout()函数的示例代码：

R
layout(matrix(c(1, 1, 2, 3), 2, 2, byrow = TRUE))
plot(1:10)
plot(10:1)
plot(rnorm(100))

在这个例子中，我们使用layout()函数将图形设备的布局设置为2行2列。通过调用layout(matrix(c(1, 1, 2, 3), 2, 2, byrow = TRUE))，我们将第一个图形绘制在第一行的第一列，第二个图形绘制在第一行的第二列，第三个图形绘制在第二行的第一列。

使用ggplot2创建组合图的案例

下面是一个使用ggplot2创建组合图的简单案例。我们将使用mtcars数据集，并绘制两个散点图和一个箱线图。

R
library(ggplot2)
# 创建第一个散点图
plot1 <- ggplot(mtcars, aes(x = wt, y = mpg)) +</p>  geom_point() +
  lABS(title = "第一个散点图")
# 创建第二个散点图
plot2 <- ggplot(mtcars, aes(x = disp, y = mpg)) +</p>  geom_point() +
  lABS(title = "第二个散点图")
# 创建箱线图
plot3 <- ggplot(mtcars, aes(x = as.factor(cyl), y = mpg)) +</p>  geom_boxplot() +
  lABS(title = "箱线图")
# 组合图形
par(mfrow = c(2, 2))
print(plot1)
print(plot2)
print(plot3)

在这个例子中，我们首先使用ggplot2创建了三个单独的图形对象。然后，我们使用par(mfrow = c(2, 2))将图形设备的布局设置为2行2列，并使用print()函数将每个图形打印到图形设备上。

par()和layout()函数都可以用于创建组合图。使用par()函数可以更简单地设置图形的布局，而使用layout()函数可以更灵活地控制每个图形的位置和大小。根据具体的需求，我们可以选择适合的函数来创建组合图。