r - 缩放逗号（）函数在geom_text（）中不起作用？

Question

运行以下代码后，我收到错误：

逗号错误（计数）：找不到函数“逗号”

ggplot(mydata, aes(xvar, fill=yvar)) + 
  geom_bar(alpha = 0.7) +
  scale_y_continuous(breaks = seq(0, 14000, by=1000), label = comma) +
  labs(title="title", x="xlab", y="ylab") +
  scale_fill_manual(values=c("gold2", "forestgreen", "dimgrey")) +
  theme(panel.background = element_rect(fill = 'gray95'),
        title = element_text(face = "bold.italic", color = "black"),
        plot.title = element_text(hjust = 0.5))  +
  geom_text(stat = "count", 
            aes(label = comma(..count..)), 
            size = 4,
            position = position_stack(vjust = 0.50))

一旦我comma()从内部删除函数geom_text()，代码运行良好并生成我想要的图形，除了数据标签不是逗号格式。我已经加载了“秤”包，甚至可以在线使用label = comma。scale_y_continuous()我在这里做错了什么？

标签： rggplot2