可以使用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
执行以上代码后,将在条形图上显示每个条形的数值。您也可以根据需要调整字体大小、颜色等参数。