我试图保持一个层的图例(平滑),并删除另一个层的图例(点)。我已经尝试用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()