Usuń dodatkowe legendy w ggplot2

Mam prostą ramkę danych, którą próbuję wykonać za pomocą połączonego wykresu linii i punktów ggplot2. Przypuśćmy, że moje dane wyglądają tak:

df <- data.frame(x=rep(1:10,2), y=c(1:10,11:20), 
                 group=c(rep("a",10),rep("b",10)))

I próbuję ułożyć fabułę:

g <- ggplot(df, aes(x=x, y=y, group=group))
g <- g + geom_line(aes(colour=group))
g <- g + geom_point(aes(colour=group, alpha = .8))
g

Wynik wygląda dobrze z jednym wyjątkiem. Ma dodatkową legendę pokazującą alphamoją geom_pointwarstwę.

Jak mogę zachować legendę pokazującą kolory grup, ale nie tę, która pokazuje moje ustawienia alfa?

Estetykę można ustawić lub odwzorować w trakcie ggplotrozmowy.

• Estetyka zdefiniowana wewnątrz aes(...)jest odwzorowywana na podstawie danych i tworzona jest legenda.
• Estetyczny może być również ustawiony na wartość pojedynczego, definiując ją na zewnątrz aes().

W takim przypadku wydaje się, że chcesz ustawić alpha = 0.8 i zmapować colour = group .

Aby to zrobić,

Umieść alpha = 0.8poza aes()definicją.

g <- ggplot(df, aes(x = x, y = y, group = group))
g <- g + geom_line(aes(colour = group))
g <- g + geom_point(aes(colour = group), alpha = 0.8)
g

Dla każdej zmapowanej zmiennej można ukryć wygląd legendy, używając guide = 'none'w odpowiednim scale_...wywołaniu. na przykład.

g2 <- ggplot(df, aes(x = x, y = y, group = group)) + 
        geom_line(aes(colour = group)) +
        geom_point(aes(colour = group, alpha = 0.8))
g2 + scale_alpha(guide = 'none')

Który zwróci identyczną fabułę

Komentarz EDIT @ Joran jest trafny, moja odpowiedź była bardziej wyczerpująca

Po prostu dodaj show.legend = Fkod po części, w której go nie chcesz.

g <- ggplot(df, aes(x=x, y=y, group=group))
g <- g + geom_line(aes(colour=group))
g <- g + geom_point(aes(colour=group, alpha = .8), show.legend = F)

W przypadku starszych wersji ggplot2 (wersje wcześniejsze niż 0.9.2, wydane pod koniec 2012 r.) Ta odpowiedź powinna działać:

Próbowałem tego z a colour_scalei nie zadziałało. Wygląda na to, że colour_scale_hueelement działa jak funkcja z domyślnym parametrem TRUE. Dodałem scale_colour_hue(legend=FALSE)i zadziałało.

Nie jestem pewien, czy tak jest w przypadku wszystkich pozycji w skali kolorów w ggplot