如何为ggplot2中x轴上的3个图表添加图例？

嘿，我看你现在的代码是用宽格式数据绘制不同工资指标（mw、mw_tip、mw_gap）的图表，但没法自动生成图例对吧？这是因为ggplot2的图例是基于**美学映射（aesthetic mapping）**生成的，而宽格式数据没法让ggplot识别出需要区分的类别。咱们把数据转成「长格式」就能轻松解决这个问题，下面是具体步骤：

第一步：把宽格式数据转成长格式 #

首先需要用tidyr包的pivot_longer()函数把你的宽数据转换成适合ggplot的长数据。如果没装这个包先安装一下：

install.packages("tidyr")
library(tidyr)

然后执行数据转换：

# 把mw、mw_tip、mw_gap三列转成"工资类型"和"数值"两列
wage_data_long <- pivot_longer(wage_data, 
                               cols = c(mw, mw_tip, mw_gap), 
                               names_to = "wage_type", 
                               values_to = "wage_value")

转换后的数据会变成每行对应一个州的一种工资指标，这样ggplot就能通过wage_type这个类别变量来生成图例。

第二步：修改ggplot代码生成图例 #

现在用长数据绘图，把color（如果是柱状图也可以用fill）映射到wage_type变量上，ggplot就会自动生成图例了。这里以柱状图为例，你也可以换成折线图等其他类型：

library("ggplot2")
theme_set(theme_bw())

ggplot(wage_data_long, aes(x = state_name, y = wage_value, color = wage_type)) +
  geom_bar(stat = "identity", position = "dodge", fill = "white") + # position=dodge让柱子并排展示
  labs(title = "各州工资指标对比", 
       x = "州名", 
       y = "工资数值", 
       color = "工资类型") + # 自定义图例标题
  scale_color_manual(values = c("mw" = "steelblue", "mw_tip" = "seagreen", "mw_gap" = "coral")) # 自定义图例颜色（可选）

关键说明 #

• 核心逻辑是把类别变量（这里是工资指标类型）绑定到aes里的color/fill参数，这样ggplot就能识别出需要区分的组别，自动生成对应图例。
• 如果你的原始代码是用多个geom_*分别绘制不同指标（比如单独画mw、mw_tip、mw_gap），这种方式没法生成图例——因为ggplot没法识别这些是同一类别的不同组，所以一定要转成「单geom+美学映射」的模式。
• 你可以用scale_color_manual()或scale_fill_manual()自定义图例颜色，让图表更贴合需求。

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