geom_text更改栏的长度

Question

我有这样定义的ggplot：

ggplot(pol, aes(x=angle, y=distance )) + coord_polar(start=0) + geom_bar(width = 1, stat = "identity") +
  scale_x_continuous(breaks=seq(0, 360), expand=c(0,0), lim=c(0, 360))+
  scale_area()

这里没有问题，但是当我以这种方式在每个geom_bar的末尾添加文本时（显示的是条的长度值）：

geom_text(aes(y = 30,label = text),size=2)

似乎参数y改变了条的长度，所以我不明白为什么。我只想设置文本的y位置。