可以使用geom_text()函数在条形图上加上数值。具体步骤如下：

首先，计算条形图中每个条形的中心点的坐标，可以使用位置调整参数position = position_stack()。

然后，在geom_text()函数中指定label = …count…，表示显示每个条形的计数值。

示例代码如下：

library(ggplot2)# 创建数据集data <- data.frame(category = c("A", "B", "C"),value = c(10, 20, 30))# 创建条形图plot <- ggplot(data, aes(x = category, y = value)) +geom_bar(stat = "identity") +geom_text(aes(label = ..count..), position = position_stack(vjust = 0.5), stat = "count", size = 5)plot

执行以上代码后，将在条形图上显示每个条形的数值。您也可以根据需要调整字体大小、颜色等参数。