如何在不修改原始数据的情况下为条形图添加对应标签图例

核心思路 #

无需修改原始数据，通过给geom_bar添加fill映射关联var1，再自定义图例标签即可实现需求：X轴显示原始编码（"01"/"02"），右侧图例展示编码与对应名称的映射关系。

完整代码示例 #

# 定义编码-名称映射关系
value_labels <- c("01" = "Type 1", "02" = "Type 2", "03" = "Type 3")

# 绘制条形图（全程不修改原始数据）
ggplot(df, aes(x = var1, fill = var1)) +
  geom_bar() +
  # 将图例的原始编码替换为对应名称
  scale_fill_discrete(labels = value_labels) +
  labs(
    title = "var1取值频率分布",
    x = "编码类别",
    y = "频数",
    fill = "编码对应说明" # 设置图例标题
  ) +
  theme(
    legend.position = "right" # 固定图例在右侧，可按需调整为top/bottom等
  )

关键细节说明 #

1. fill映射触发图例：通过aes(fill = var1)让ggplot自动生成图例，同时X轴会保留var1的原始编码值，不会被替换。
2. 自定义图例标签：scale_fill_discrete(labels = value_labels)直接将图例上的原始编码替换为对应的名称，实现"01=Type1"的映射展示。
3. 无原始数据修改：所有处理逻辑都在绘图代码内完成，不会改动原数据集的var1字段。
4. 可选优化：如果不需要用颜色区分条形，可改用scale_fill_manual设置统一填充色，同时保留自定义图例标签：

   scale_fill_manual(values = rep("#1f77b4", length(value_labels)), labels = value_labels)
   

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