为geom_count创建数据标签

Question

我对 R 非常陌生，我现在正在练习使用“palmerpenguins”包进行数据可视化： 我制作了以下图表来检查企鹅根据物种和岛屿的分布：

ggplot(data=penguins_raw,mapping=aes(x=Species,y=Island))+
  geom_count(aes(color=after_stat(n)))

但是，我还想添加数据标签来显示每个物种/岛屿的企鹅数量。 我明白我应该使用“geom_text”函数，但我已经尝试过但无法正确编写该函数。 非常感谢您的帮助！

我尝试过的功能包括： #1：

ggplot(data=penguins_raw,mapping=aes(x=Species,y=Island))+
  geom_count(aes(color=after_stat(n)))+
  geom_text(aes(label=n,color = "#ffffff"))

#2：

ggplot(data=penguins_raw,mapping=aes(x=Species,y=Island))+
  geom_count(aes(color=after_stat(n)))+
  geom_text(aes(label=after_stat(n),color = "#ffffff"))

但显然我没有编写正确的函数。