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") 

除了图例的标题外，一切都在正确地显示在情节中，图例的标题显示为“标题”。

​

​

我想把这个传说的标题改成别的--比如"V.线“

我尝试了下面的代码，这给了我我想要的图例(和标题)，但也给了我一个我不想要的额外的传奇。

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")