如何在ggplot中添加多个图例标题(列)

在ggplot中添加多个图例标题（列）可以通过使用guides()函数来实现。guides()函数允许我们自定义图例的外观和行为。

首先，我们需要创建一个ggplot对象，并使用scale_color_manual()和scale_shape_manual()函数来设置颜色和形状的自定义图例。然后，使用guides()函数来添加多个图例标题。

下面是一个示例代码：

library(ggplot2)

# 创建一个示例数据集
data <- data.frame(
  x = 1:10,
  y = 1:10,
  group1 = rep(c("A", "B"), each = 5),
  group2 = rep(c("C", "D"), each = 5)
)

# 创建ggplot对象并设置颜色和形状的自定义图例
p <- ggplot(data, aes(x, y, color = group1, shape = group2)) +
  geom_point(size = 3)

# 添加多个图例标题
p <- p +
  guides(color = guide_legend(title = "Group 1"),
         shape = guide_legend(title = "Group 2"))

# 显示图形
print(p)

在这个示例中，我们创建了一个包含x、y坐标和两个分组变量group1和group2的数据集。然后，我们使用ggplot()函数创建了一个ggplot对象，并使用aes()函数设置了x和y的映射，以及颜色和形状的分组变量。

接下来，我们使用geom_point()函数添加了一个散点图层，并设置了点的大小为3。

然后，我们使用guides()函数来添加多个图例标题。在这个示例中，我们使用guide_legend()函数来设置每个图例的标题，其中title参数用于指定标题的文本。

最后，我们使用print()函数来显示图形。

这是一个完整且全面的答案，涵盖了如何在ggplot中添加多个图例标题的方法，并提供了示例代码和相关函数的介绍。