Hapus 'a' dari legenda saat menggunakan aesthetics dan geom_text

Bagaimana saya bisa menghapus huruf 'a' dari legenda yang dibuat oleh kode ini? Jika saya menghapus geom_text, maka huruf 'a' tidak akan ditampilkan di legenda. Saya ingin menyimpannya geom_text. ggplot(data = iris, aes(x = Sepal.Length, y=Sepal.Width, shape = Species, colour = Species)) +...