堆积条顶部的螺栓值

Question

我想把我将要放在栏顶上的统计数据的大纲加粗。此代码获取堆积条形中的值，并将它们的总和放在顶部。

以下是代码：

stat_summary(fun.y = sum, aes(label = ..y.., group = Week, col = "#FF4500"), geom = "text", vjust = -.5) 

有人有任何建议吗？