r - 如何处理 ggplot2 中 geom_bar 中的 yaxs？

Question

我正在尝试创建一个geom_bar：

ma.at.vs.t.duh + geom_bar(stat="bin", fill="white", colour="black", width=.2) +
ggtitle("Mandant 10 und 50") + 
theme(plot.title = element_text(lineheight=.6, face="bold")) + 
xlab("Vertragsart") + 
ylab("Anzahl und %") +
theme(axis.title.x = element_text(vjust=0.5, size=14), axis.text.x=element_text(size=8)) +
stat_bin(aes(label=..count..), geom="text", size=4, vjust=-0.5) +
stat_bin(aes(label = paste(sprintf("%.02f %%", ..count../sum(..count..)*100))), geom="text", size=3, vjust=-2.0)

如何设置y-Axis从0（零）开始。我不需要“美国空间”；-) 非常感谢。