在 ggplot2 中使用组、线型和颜色时的单个图例?

Single legend when using group, linetype and colour in ggplot2?

我正在创建一个非常简单的图表,它对数据进行分组并使用分组变量来确定线型和颜色。然后我使用 'scale_linetype_manaul' 和 'scale_colour_manual' 覆盖那些。到目前为止一切顺利,但是当我尝试修改图例标签或其标题时,图例分为两部分:一部分用于线型,一部分用于颜色。我只想要一个图例,但带有自定义标签和标题。

this question 之后,我确保将两个秤 objects 命名为相同,但这似乎没有帮助。

最小示例:

X <- data.frame(TPP=factor(c(1,5,10,1,5,10,1,5,10)), 
                value=c(-0.035819, 0.003356, 0.066091, -0.028039, 0.004333, 0.060292, -0.023115, 0.005661, 0.058821), 
                horizon=c(1,1,1,2,2,2,3,3,3))
ggplot(X, aes(x=horizon, y=value, group=TPP, col=TPP, linetype=TPP))+
  geom_line(size=1)+
  scale_linetype_manual(name="X", values = c("solid","dashed", "dotted")) +
  scale_color_manual(name="X", values = c("black", "red", "blue"), labels=c("Low", "5","High"))

这会产生以下带有两个图例的 figure。如何使用自定义标签和标题重新组合这些图例?

这可能有帮助:

 ggplot(X, aes(x=horizon, y=value, group=TPP, col=TPP, linetype=TPP))+geom_line(size=1)+
  scale_linetype_manual(name="X", values = c("solid","dashed", "dotted"),labels=c("Low", "5","High")) +
  scale_color_manual(name ="X", values = c("black", "red", "blue"),labels=c("Low", "5","High"))

如果scale_color_manualscale_linetype_manual中定义的标签不同,或者只在其中一个中指定,会得到两种不同的图例。