小编Guy*_*Guy的帖子

我试图保持一层的图例(平滑)并删除另一层(点)的图例.我试过用guides(colour = FALSE)和关掉传说geom_point(aes(color = vs), show.legend = FALSE).

编辑:由于这个问题及其答案很受欢迎,一个可重现的例子似乎是有序的:

library(ggplot2)
ggplot(data = mtcars, aes(x = mpg, y = disp, group = gear)) +
geom_point(aes(color = vs)) +
geom_point(aes(shape = factor(cyl))) +
geom_line(aes(linetype = factor(gear))) +
geom_smooth(aes(fill = factor(gear), color = gear)) + 
theme_bw()