У меня есть простой фрейм данных, который я пытаюсь сделать комбинированным линейным и точечным графиком, используя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 слой.

Как я могу сохранить легенду, показывающую цвета группы, но не ту, которая показывает мои альфа-настройки?