Видаліть зайві легенди в ggplot2

У мене є простий фрейм даних, за допомогою якого я намагаюся зробити комбінований графік ліній і точок ggplot2. Припустимо, мої дані виглядають так:

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

І я намагаюся скласти сюжет:

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

Результат виглядає чудово, за одним винятком. У нього є додаткова легенда, що показує alphaдля мого geom_pointшару.

Як я можу зберегти легенду, яка відображає групові кольори, але не ту, яка відображає мої альфа-налаштування?

Естетику можна встановити або відобразити в межах ggplotдзвінка.

• Естетика, визначена всередині aes(...), відображається на основі даних і створюється легенда.
• Естетику також можна встановити для одного значення, визначивши її зовні aes().

У цьому випадку, схоже, ви хочете встановити alpha = 0.8 та зіставити карту colour = group .

Зробити це,

Розмістіть alpha = 0.8зовнішнє aes()визначення.

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

Для будь-якої відображеної змінної ви можете подавити появу легенди, використовуючи guide = 'none'відповідний scale_...виклик. напр.

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')

Що поверне ідентичний сюжет

EDIT @ Коментар Джорана спотовий, я зробив свою відповідь більш вичерпною

Просто додайте show.legend = Fкод після тієї частини, де ви його не хочете.

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)

Для старих версій ggplot2 (версії до 0.9.2, випущені наприкінці 2012 року), ця відповідь повинна працювати:

Я спробував це з a, colour_scaleі це не спрацювало. Здається, colour_scale_hueелемент працює як функція із параметром за замовчуванням TRUE. Я додав, scale_colour_hue(legend=FALSE)і це спрацювало.

Я не впевнений, що це стосується всіх елементів кольорової шкали в ggplot