有没有一种方法可以用ggplot2在R中以科学计数形式显示出图geom_text数据标签?

我想以科学计数法显示地块标签。似乎可以通过将变量('TotVol')包装在函数中来实现,但是我无法找到关于如何使用ggplot表示法来实现此目的的任何建议。

我的情节呼吁如下

p<-ggplot(data=df, aes(x=DayType, y=TotVol, fill = Year))+
  geom_bar(stat="identity", position=position_dodge())+
  geom_text(aes(label=TotVol),position=position_dodge(width=0.9), vjust = -0.25)

Plot output