r - 使用身份标度时为 alpha 添加图例

Question

我正在构建一个有点复杂的图，并想手动指定每个点的 alpha。我可以用 scale_alpha_identity 做到这一点，到目前为止一切顺利。但现在我想为我的 alpha 比例添加一个图例。添加指南到 scale_alpha_identity 似乎不起作用 - 我只是收到一个错误，即使我尝试按照文档建议添加中断和标签:http://ggplot2.tidyverse.org/reference/scale_identity.html .

最小示例:这会生成我想要的情节，但没有图例。

ggplot(data = iris) + 
  geom_point(aes(x = Sepal.Length, y = Sepal.Width, 
                 alpha = Petal.Length / max(Petal.Length))) + 
  scale_alpha_identity()

根据文档，我认为这行得通，但行不通:

ggplot(data = iris) + 
  geom_point(aes(x = Sepal.Length, y = Sepal.Width, 
                 alpha = Petal.Length / max(Petal.Length))) + 
  scale_alpha_identity(breaks = c(0, 1), labels = c(0, 1), guide = 'legend')

我还尝试了许多其他变体:将 'colorbar' 或 'legend' 直接传递给 guide 参数，带和不带中断和标签，传递 guide_legend 或 guide_colorbar 而不是字符串 - 运气不好，只是不同的错误消息。按照 Is there a way to add a legend for ggplot's alpha? 中的建议添加假秤对我不起作用，因为它覆盖了我的身份等级。

Answer 1

如果您在 scale_alpha_identity 中设置了 limits，您可以通过 guides 添加图例。

ggplot(data = iris) + 
    geom_point(aes(x = Sepal.Length, y = Sepal.Width, 
                   alpha = Petal.Length / max(Petal.Length))) + 
    scale_alpha_identity(limits = c(.2, 1)) +
    guides(alpha = guide_legend() )