R ggplot2:“一个；“不整合”；图例中的不同几何图形

如果查看图例，图例显示蓝色和红色的“线+点”形状

如果图例显示蓝色与“线”形状相匹配，红色与“点”形状相匹配，我会喜欢它

---

有办法做到这一点吗？

您可以按如下方式覆盖图例美学

A=seq(10,12)
B=seq(1,3)
C=seq(20,22)
df=melt(data.frame(A,B,C))

ggplot(df,aes(variable,value))+
stat_summary(
    geom="errorbar",
    fun.data=mean_se,
    aes(color="Error bars",group=variable))+
scale_color_manual(
    values=c("red","blue"))+
geom_point(
    aes(color="Data points"))

制作：

 ggplot(df,aes(variable,value))+
      stat_summary(
        geom="errorbar",
        fun.data=mean_se,
        aes(color="Error bars",group=variable))+
      scale_color_manual(
        values=c("red","blue"))+
      geom_point(
        aes(color="Data points")) +
      guides(fill = guide_legend(override.aes = list(linetype = 0, shape=''))
             , color = guide_legend(override.aes = list(linetype=c(0,1)
                                                         , shape=c(16,NA))))