Estoy tratando de mantener la leyenda de una capa (suave) y eliminar la leyenda de la otra (punto). He intentado apagar las leyendas con guides(colour = FALSE)y geom_point(aes(color = vs), show.legend = FALSE). Editar : como esta pregunta y sus respuestas son populares, un ejemplo reproducible...