如何修改ggplot图例标签？无需修改数据框实现自定义标签

你遇到的问题根源在于：同时将gr变量映射到了color和linetype两个美学属性，默认情况下ggplot会为每个属性生成独立图例；而第二种方法里直接用gr作为guides的参数是错误的，因为guides需要针对具体的美学属性（比如color、linetype）来设置。

下面提供两种无需修改数据框的解决方案：

方法1：统一两个美学属性的scale配置 #

为color和linetype分别设置相同的标题与标签，ggplot会自动将两个图例合并为一个：

dfa <- data.frame(x=rep(1:5,2),y=c(1:5/3,5:1/2),
    gr=factor(rep(1:2,each=5)))
ggplot(dfa,aes(x,y,group=gr,color=gr,linetype=gr))+
    geom_line(size=1.2)+
    scale_color_hue(name = "分组标题", labels = c("Big Name 1", "Big Name 2"))+
    scale_linetype_discrete(name = "分组标题", labels = c("Big Name 1", "Big Name 2"))

方法2：通过guides统一配置图例 #

直接针对color和linetype两个美学属性，指定同一个图例的标题与标签：

ggplot(dfa,aes(x,y,group=gr,color=gr,linetype=gr))+
    geom_line(size=1.2)+
    guides(
        color = guide_legend(title = "分组标题", labels = c("Big Name 1", "Big Name 2")),
        linetype = guide_legend(title = "分组标题", labels = c("Big Name 1", "Big Name 2"))
    )

补充说明 #

• 两种方法都不需要修改原始数据框，直接在ggplot的图层配置中完成标签设置
• 核心是让两个美学属性对应的图例标题完全一致，这样ggplot会自动合并它们

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