r - 在不改变图形参数的情况下更改 ggplot2 图例标题

Question

我在 ggplot2 中找到了许多关于图例标题的主题，但几个小时后我无法处理我的情况。

这是数据集:

> dat
  FACTOR1 FACTOR2 lsmean lower.CL upper.CL
1       A      aa   26.2     25.6     26.8
2       B      aa   24.8     23.9     25.7
3       A      bb   26.0     25.2     26.7
4       B      bb   24.9     23.9     25.9
5       A      cc   24.4     23.9     24.8
6       B      cc   23.9     22.9     25.0
7       A      dd   24.9     24.3     25.6
8       B      dd   23.2     22.3     24.0

以及感兴趣的图形:

gp0 <- ggplot(dat, aes(x=FACTOR2, y=lsmean, group=FACTOR1, colour=FACTOR1)) 
( gp1 <- gp0 +  geom_line(aes(linetype=FACTOR1), size=.6) + 
    geom_point(aes(shape=FACTOR1), size=3) + 
    geom_errorbar(aes(ymax=upper.CL, ymin=lower.CL), width=.1) +
    geom_errorbar(aes(ymax=upper.CL, ymin=lower.CL), width=.1) ) 

如果我使用 scale_colour_manual()要更改图例标题，我会得到一个意想不到的附加图例:

gp1 + scale_colour_manual("NEW TITLE",values=c("red","blue"))

我用 scale_"aes"_manual("guide=none", values=...) 压制了这个额外的图例但我不明白如何控制参数(点和线的样式):

gp1 + scale_colour_manual("NEW TITLE",values=c("red","blue")) +
    scale_shape_manual(guide = 'none', values=c(1,2))   + 
    scale_linetype_manual(guide = 'none', values=c(1,3))  

请如何使用且仅使用新的图例标题重现第一个情节？

Answer 1

您必须为所有 aes() 设置相同的标题您使用过的属性，例如，使用函数 labs() .

gp1 + scale_colour_manual(values=c("red","blue"))+
    labs(colour="NEW TITLE",linetype="NEW TITLE",shape="NEW TITLE")