ggplot2两层堆叠条形图按“是”类占比重排分类轴方法

很多人会误以为堆叠条形图的坐标轴排序逻辑和普通条形图不一样，实际上两者核心逻辑完全相同：ggplot所有分类坐标轴的显示顺序，100%由分类变量的有序因子水平决定，和你用单条、堆叠、分组的geom_col没有任何关系。你只需要把category的因子水平调整到符合目标顺序，就能实现要求的纵轴排布，不需要修改原有绘图图层代码。

具体实现步骤 #

方法1：提前规整因子（稳定性最强，适合复杂场景） #

先提取每个分类下的排序锚点（也就是各分类Yes对应的占比），转换为有序因子后再绘图：

library(dplyr)

# 1. 明确目标排布：coord_flip之后，纵轴从上到下需要是B（Yes占比0.23）、C（0.2）、A（0.18）
# 对应x轴从左到右的因子顺序（翻转后就是纵轴从下到上的顺序）是：最左=最下=A，中间=C，最右=最上=B
cat_levels <- data %>% 
  filter(question == "Yes") %>% 
  # 按Yes占比升序提取分类名，正好匹配上述x轴顺序
  arrange(percent) %>% 
  pull(category)

# 2. 把原数据中的category转换为指定顺序的因子
data_ordered <- data %>% 
  mutate(category = factor(category, levels = cat_levels))

# 3. 直接运行原有绘图代码，即可得到目标排布
data_ordered %>% 
  ggplot(aes(x = category, y = percent, fill = question)) + 
  geom_col(position = "fill") + 
  coord_flip()

方法2：aes参数内直接用reorder简写 #

不需要单独创建中间数据帧，直接在x映射中嵌入排序逻辑，效果和方法1完全一致：

data %>% 
  ggplot(aes(
    # reorder逻辑：对每个category分组，取question为Yes对应的percent作为排序依据，按值从小到大排因子水平
    # 计算得到的锚点值：A=0.18、C=0.2、B=0.23，升序排列后得到的因子顺序为A<C<B，完全匹配目标要求
    x = reorder(category, percent, function(x) x[question == "Yes"]),
    y = percent, 
    fill = question
  )) + 
  geom_col(position = "fill") + 
  coord_flip()

常见调整技巧 #

• 如果绘制后发现纵轴顺序上下颠倒（比如最上方是占比最低的A），只要给reorder的锚点值加负号，或者把生成的cat_levels向量用rev()反转即可。
• 踩坑提醒：不要直接写reorder(category, percent)，这种写法会把每个category下的所有percent值（含No分组）作为排序输入，不符合只按Yes占比排序的需求，必须在排序逻辑里明确指定取Yes分组对应的percent值作为锚点。
• 不需要调整position="fill"或者其他geom_col参数，排序逻辑完全和堆叠效果解耦。

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