J'essaie de garder la légende d'un calque (lisse) et de supprimer la légende de l'autre (point). J'ai essayé de fermer les légendes avec guides(colour = FALSE)et geom_point(aes(color = vs), show.legend = FALSE). Edit : Comme cette question et ses réponses sont populaires, un exemple reproductible...