如何在ggplot2中将geom_text更改为百分比

Question

我试图将下面名为cover_type_ratio的colomn中的小数点转换为ggplot2中的百分比。这是df

DF

这是我的条形码代码：

plot<-ggplot(coverType_count, aes(x=Cover_Type, y=count)) + 
geom_bar(stat="identity") + 
scale_y_continuous() +
geom_text(data=coverType_count,aes(label=count,y=count+100),size=4) + 
geom_text(data=coverType_count, 
aes(label=cover_type_ratio,y=count+200),size=4)+
theme(axis.text.x=element_text(angle=30,hjust=1,size=8))+ 
ggtitle('Cover Type Distribution')

绘制时，它看起来像这样：

Screenshot of Plot

我需要将df中上面的cover_type_ratio列中的混乱数字更改为百分比，并尝试使用比例库，但无济于事。有没有人有什么建议？

谢谢！