时间戳

首页 > 解决方案 > 在密度图中添加图例形式 geom_area

r - 在密度图中添加图例形式 geom_area

问题描述

我有以下图表。我想添加一个图例来解释密度中的灰色区域。有什么建议么？

在此处输入图像描述

这里的代码：

dd <- density(x, y, , na.rm = TRUE)
dd <- data.frame(x=dd$x,y=dd$y )

ggplot(dd, aes(x,y)) + 
 geom_line(color="black") + xlim(range(0, 45)) +
 geom_area(data = subset(dd, x >41), color="grey", fill = "grey")  +
 scale_x_discrete(limits=seq(from=0, to=45, by =5),
  labels=c("45", "40" , "35" , 
  "30", "25","20","15" , "10" , "5" , "Election")) + theme_minimal() +
 labs(title="Local Election", y="Density", x="Distance to the election(in 
  Months)")

标签： rggplot2legend

解决方案

你需要给你的 增加一种美感geom_area()，像这样：

geom_area(data = subset(dd, x > 41), aes(fill = "x>41"))

这将达到你想要的，但颜色不会是灰色的，要改变颜色，你需要使用scale_fill_manual()：

ggplot() + .... + scale_fill_manual(values = c("x>41"="grey"))

推荐阅读