Supprimer «a» de la légende lors de l'utilisation de l'esthétique et de geom_text

Comment puis-je supprimer la lettre «a» de la légende générée par ce code? Si je supprime le geom_text, la lettre «a» n'apparaîtra pas dans la légende. Je veux garder geom_text, cependant. ggplot(data = iris, aes(x = Sepal.Length, y=Sepal.Width, shape = Species, colour = Species)) + geom_point() +...