如何在ggplot2中自定义含样本数的非固定X轴标签顺序

核心思路是保留原始Level列的有序factor属性，以此为依据控制带样本数的Level_N标签顺序，以下是两种实用方法：

方法1：基于原始Level顺序手动设置Level_N的factor levels #

先确保原始Level列是指定顺序的factor，再提取对应顺序的Level_N唯一值作为其levels：

library(ggplot2)

# 模拟数据
set.seed(123)
df <- data.frame(
  Level = rep(c("Normal", "Mild", "Moderate", "Severe"), c(3,5,4,2)),
  Value = rnorm(14)
)

# 生成带样本数的Level_N标签
df$Level_N <- paste0(df$Level, " (N=", ave(df$Level, df$Level, FUN = length), ")")

# 1. 将原始Level转为指定顺序的factor
df$Level <- factor(df$Level, levels = c("Normal", "Mild", "Moderate", "Severe"))

# 2. 根据Level的顺序，设置Level_N的factor levels
df$Level_N <- factor(df$Level_N, levels = unique(df$Level_N[order(df$Level)]))

# 绘图验证顺序
ggplot(df, aes(x = Level_N, y = Value)) +
  geom_boxplot() +
  theme_bw()

方法2：用fct_reorder关联原始Level的整数顺序 #

利用factor转整数后对应其levels顺序的特性，用fct_reorder直接指定排序依据：

library(ggplot2)
library(forcats)

# 沿用上面的模拟数据（已生成Level_N）
df$Level <- factor(df$Level, levels = c("Normal", "Mild", "Moderate", "Severe"))

# 用原始Level的整数顺序重排Level_N
df$Level_N <- fct_reorder(df$Level_N, as.integer(df$Level))

# 绘图验证
ggplot(df, aes(x = Level_N, y = Value)) +
  geom_boxplot() +
  theme_bw()

注意点 #

之前使用fct_reorder未达预期，大概率是因为没有指定原始Level列的顺序作为排序依据，而是误用了其他变量（比如Value的均值等），只要关联原始有序的Level列，就能精准控制带样本数标签的顺序。

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