ggplot图例

Question

当我使用相同的颜色绘制点和文本时，a和形状在图例中重叠。

我可以告诉ggplot不要在图例中绘制a吗？怎么样？

M <- data.frame(t=letters[1:16],
            xx=runif(16),
            yy=runif(16),
            g=rep(c("A","B","C","D"),4))
str(M)

ggplot(M,aes(x=xx,y=yy,label=t,colour=g)) + 
       geom_point(shape=3) + 
       geom_text(vjust=0,hjust=0) + 
       scale_colour_discrete()