ggplot2：更改 scale_color_viridis_c 的 Alpha 但不是图例

Question

我想为我的 ggplot 添加一个 alpha，但不影响图例的 alpha。当前的解决方案是添加：guides(color = guide_legend(override.aes = list(alpha = 1))) 的覆盖。这可以设置 alpha=1，但会将图例比例更改为离散点而不是比例。

如何更改色标的 Alpha，同时保持完整的可见性和图例中的实际比例？

示例代码：

library(ggplot2)

###Generate Mock Data ###
df<- data_frame(y=seq(1:100), x=seq(1:100), z=seq(1:100))

###Plot without Alpha ###
df %>% ggplot(aes(x=x, y=y, color=z)) +
  geom_point()+
  scale_color_viridis_c()

###Plot with Alpha showing alpha on legend with continuous scale ###
df %>% ggplot(aes(x=x, y=y, color=z)) +
      geom_point()+
      scale_color_viridis_c(alpha=0.01)

###Plot with Alpha showing alpha=1 on legend but scale changed to discrete###

df %>% ggplot(aes(x=x, y=y, color=z)) +
  geom_point()+
  scale_color_viridis_c(alpha=0.5)+
  guides(color = guide_legend(override.aes = list(alpha = 1)))

Answer 1

您可以简单地将您的 alpha 添加到 geom_point() 而不是色标。下面是一个可重现的示例，突出了您当前的方法与实现您所要求的正确方法之间的差异，即，'如何在保持完全可见性和图例中的实际比例的同时更改我的色阶的 alpha ?'

library(ggplot2)
library(vctrs)

###Generate Mock Data ###
df<- data_frame(y=seq(1:100), x=seq(1:100), z=seq(1:100))

###Plot with Alpha = 0 showing points and legend disappears###
ggplot(df,aes(x,y,color=z)) +
      geom_point()+
      scale_color_viridis_c(alpha=0.00)

###Plot with Alpha = 0.1 showing points and legend disappears###
ggplot(df,aes(x,y,color=z)) +
      geom_point()+
      scale_color_viridis_c(alpha=0.1)

###Plot with Alpha = 0 showing points disappear while legend remains visible###
ggplot(df,aes(x,y,color=z)) +
  geom_point(alpha=0.00)+
  scale_color_viridis_c()

###Plot with Alpha = 0 showing points disappear while legend remains visible###
ggplot(df,aes(x,y,color=z)) +
  geom_point(alpha=0.1)+
  scale_color_viridis_c()