ggplot2 中图例项的颜色未链接到我的数据集

Question

根据标题，我在 ggplot2 中的问题是图例的颜色没有链接到地图上显示的颜色。

我有一个欧洲地图变量：

# Create a map of Europe
eu_base <- qmap(location = "Cologne, Germany", zoom = 4, color = "bw", extent = "panel")

然后我有一个包含 3 列的数据框：纬度、经度和值（持续时间），称为 TimeOverdf。然后我在 TimeOverdf 变量中创建 value 列的离散值：

# I create a variable with the breaks
brk<-unique(c(1,seq(10,max(TimeOverdf$value),10),max(TimeOverdf$value)))

# Create a column on my dataframe with discrete values
TimeOverdf$value_discrete <- cut(TimeOverdf$value, breaks=brk, include.lowest=T)

当我用离散值和颜色创建我的图时：

eu_base +
  geom_point(data = TimeOverdf, aes(x = lon, y = lat, colour = value_discrete),
             alpha = 0.01) +
  scale_colour_manual("Duration",
                      values = colorRampPalette(c("blue", "yellow", "red"))(length(brk)-1), 
                      breaks=waiver())

图例项的颜色都是灰色的，似乎与我在 scale_colour_manual 中指定的颜色没有关联。我的印象是它们与 eu_base 地图相关联。如何使图例中的颜色与绘图中的颜色一致？

Answer 1

添加guides(color = guide_legend(override.aes = list(alpha = 1)))

ggplot2 中图例项的颜色未链接到我的数据集

Colours of the legend items in ggplot2 not linked to my dataset

r

legend

ggplot2