来自geom_vline的传奇标题

Question

我在R（v.3.4.1）中使用ggplot2（v.2.2.1）来创建包含垂直线的直方图。我使用以下代码生成直方图，放置垂直线，并将线条添加到图例：

ggplot(data = meanExps, aes(x)) + 
geom_histogram(col = "black",
               fill="lightblue") + 
geom_vline(data = meanData, 
           mapping = aes(xintercept=Vals,
                         linetype=Title, 
                         color = Title),
           size = 1, 
           show.legend = T) +
labs(x = "Exponential Means") 

除了图例的标题外，一切都在图中正确显示，标题显示为＆＃34;标题＆＃34;。

我想将传奇的标题更改为其他内容 - 比如，＆＃34; V.线＆＃34;

我尝试了以下代码，它给了我想要的传奇（和标题），但也给了我一个我不想要的额外传奇。

ggplot(data = meanExps, aes(x)) + 
geom_histogram(col = "black",
               fill="lightblue") + 
geom_vline(data = meanData, 
           mapping = aes(xintercept=Vals,
                         linetype=Title, 
                         color = Title),
           size = 1, 
           show.legend = T) +
labs(x = "Exponential Means", color = "V. Lines") 

以下是此图的图像： 。

所以，我的问题是：如何使用我选择的标题从geom_vline创建单个图例？

Answer 1

如果您希望将它们合并，则必须同时更改两种美学的标题。

labs(x = "Exponential Means", color = "V. Lines", linetype = "V. Lines")