R 在ggplot中，如何在条形图中仅打印特定条形图上方的计数？

我已经找到并被引导到许多帖子，展示了如何在ggplot中的条形图中将统计数据置于所有条形图之上，但我还没有找到一个帖子显示了如何仅在条形图中的一个条形图上显示计数/百分比

例如，使用以下绘图：

ggplot(mtcars, aes(x = gear)) + geom_bar() +
  geom_text(stat='count',aes(label=..count..),vjust=-1)

---

我怎么能只在中间栏上面打印“12”，然后在上面打印“5”和“15”呢。我想显示上述计数的条形图在不同的绘图中会有所不同（例如，在另一个绘图中，我想显示5条条形图中第4条以上的统计数据）。

我找不到使用geom_text r geom_条形图的条形图，但

注释中的示例看起来非常简单>

ggplot(mtcars, aes(x=gear, group = gear)) + geom_bar(fill=c("red", "green","blue")) + 
     annotate("text", x=4, y = 13, label = "12")

可以使用stat（）计算计数，并为geom_text（）定义所需的任何条件

库（ggplot2）
图书馆（dplyr）
#选择计数第二高的档位
g%分组依据（齿轮）%%>%汇总（n=n（））%%>%排列（版次（n））%%>%。[2，1]
ggplot（mtcars，aes（x=档位））+
geom_bar（）+
几何图形文本（stat='count'，
aes（标签=状态（如果其他（x=！！g，计数，NA）），#应用条件
color=“蓝色”，
vjust=-1）+
无效的


（v0.2.1）于2018年10月13日创建，该帖子及其引用的一篇文章仅涉及将值置于所有条之上。我只想在条形图的特定条上方打印这些值。这几乎是引用链接的副本，因此不鼓励使用两部分问题。因此，它也可能是一个副本，我鼓励您搜索一个，并记录您的搜索，然后再提出任何进一步的上诉。您需要在发布问题之前进行搜索。@42，根据您的建议进行修改。感谢您的指导。对于不需要值的位置，请使用包含
“
的向量。而且。。。关于“我如何在ggplot中手动设置几何图形填充颜色”的问题呢？比我得出的答案要好得多。这应该是公认的方法。