如何创建显示不同独立百分比的geom_bar（geometria_bar）图表

你遇到的问题是因为默认geom_bar的行为导致的：如果使用position="fill"或者依赖默认的计数统计，会把所有条形高度归一化到总和为1的比例。要实现每个条形显示独立的百分比，按以下步骤操作：

• 先确保数据中包含每个类别的独立百分比数值（比如类别A对应35%、类别B对应60%这种，不是基于整体的相对占比）。如果只有原始计数，先预处理计算百分比：

library(dplyr)
# 假设数据有category（类别）、count（该类别对应基数下的数量）、base_count（每个类别对应的总基数）
your_data <- your_data %>%
  mutate(percent = (count / base_count) * 100)

• 使用geom_col()替代geom_bar()来绘图，因为geom_col()直接使用你提供的y轴数值，而非统计计数：

library(ggplot2)
ggplot(your_data, aes(x = category, y = percent)) +
  geom_col(fill = "deepskyblue") + # 绘制条形
  geom_text(aes(label = paste0(round(percent, 1), "%")), vjust = -0.3) + # 添加百分比标签
  labs(x = "类别", y = "百分比(%)") +
  ylim(0, 100) # 根据你的百分比最大值调整范围

• 务必移除position="fill"参数，这个参数会强制所有条形高度总和为1，是导致你问题的核心原因。

内容的提问来源于stack exchange，提问作者Franziska Gafriller