Punkttransparenz in ggplot2-Legende entfernen

Question

In ggplot2 wird Transparenz, die in geom_XXX definiert ist, in der Legende wiedergegeben. Zum Beispiel:

df <- data.frame(x=runif(10000), z=ifelse(runif(10000) > 0.5, 'a', 'b')); df$y <- runif(10000); df$y[df$z == 'b'] <- cos(df$x[df$z == 'b']*10) 
ggplot(df) + geom_point(aes(x, y, color=z), alpha=0.1) 

ergibt folgendes Ergebnis:

Da die Punkte sehr transparent sind, sind sie kaum auf der Legende gesehen. Ich mag Punkt Transparenz aus der Legende entfernen, so dass der Graph wie folgt aussieht:

Wie ist das möglich?

Answer 1

Sie können die Funktion guides() und override.aes= verwenden, um den Alpha-Wert nur für Legendeneinträge festzulegen.

ggplot(df) + geom_point(aes(x, y, color=z), alpha=0.1)+ 
    guides(colour = guide_legend(override.aes = list(alpha=1)))