ggplot中图例多行拆分问题：guides不识别group美学映射

我明白你现在的困扰——想把图例拆成两行但试了group没效果对吧？其实问题出在**group参数并不负责控制图例的显示**，它只是用来给ggplot标记分组关系，而图例是由color、fill这类直接映射到视觉属性的美学参数生成的，所以得针对这些参数来调整~

先给你完整的解决方案，我们从整理数据开始（因为你的原始数据是宽格式，ggplot更适合长格式）：

1. 数据整理（转成长格式） #

首先把你的宽数据转换成ggplot需要的长格式，用tidyr::pivot_longer很方便：

library(ggplot2)
library(tidyr)

# 你的原始数据
points <- c("80","60","40","20","all")
var1 <- c(59,48,44,39,36)
var2 <- c(91,88,81,78,69)
var3 <- c(98,97,96,93,90)

# 转成长格式
df <- data.frame(points, var1, var2, var3) %>%
  pivot_longer(cols = -points, names_to = "variable", values_to = "value")

2. 绘图并设置图例为两行 #

这里假设你是用color来区分不同的var系列（如果是fill的话，把color换成fill即可），然后在guides里针对对应的美学参数设置guide_legend(nrow = 2)，同时可以调整图例位置让排版更美观：

ggplot(df, aes(x = points, y = value, color = variable)) +
  geom_point(size = 3) + # 这里用点图，你可以换成自己的几何对象
  # 关键：针对color美学设置图例为2行
  guides(color = guide_legend(nrow = 2)) +
  # 可选：把图例放在底部，让两行的排版更自然
  theme(legend.position = "bottom",
        legend.box = "horizontal")

为什么group参数没用？ #

group参数的作用是告诉ggplot哪些观测属于同一组（比如画折线图的时候，让同组的点连起来），但它不会生成图例——只有当你把变量映射到color、fill、shape这类视觉属性时，ggplot才会自动生成图例，所以你需要针对这些视觉属性来设置图例的行数，而不是group。

如果你的图里用的是fill（比如柱状图），只需要把上面代码里的color换成fill就行：

ggplot(df, aes(x = points, y = value, fill = variable)) +
  geom_col(position = "dodge") +
  guides(fill = guide_legend(nrow = 2)) +
  theme(legend.position = "bottom")

这样就能轻松把图例拆成两行啦~

内容的提问来源于stack exchange，提问作者Vinay vinay