求助：ggplot分组条形图自定义分组顺序及显示全部坐标轴标签

这里是针对你的需求修改后的完整代码，我会在后面详细拆解每个调整的逻辑：

library(ggplot2)

# 读取数据（保留你原有的数据读取方式）
data <- read.table(
 header=TRUE,
 text='alphabet amount percentage
1 A 1 30.3
2 A 2 25.8
3 A 3 21.2
4 A 4 9.1
5 A 5 9.1
6 A 6 4.5
7 C 1 23.1
8 C 2 21.5
9 C 3 9.2
10 C 4 23.1
11 C 5 13.9
12 C 6 9.2
13 B 1 27.8
14 B 2 17.5
15 B 3 14.3
16 B 4 20.6
17 B 5 14.3
18 B 6 5.6')

# 1. 调整分组顺序：将alphabet转为指定水平的因子
data$alphabet <- factor(data$alphabet, levels = c("A", "C", "B"))

# 绘制条形图并调整x轴标签
bargraph <- ggplot(data, aes(x=amount, y=percentage, fill = alphabet)) +
 geom_bar(stat="identity", position = position_dodge(0.70), width = 0.65) +
 scale_fill_brewer(palette = "Set1") +
 labs(x = "amount", y= "percentage (%)") +
 # 2. 强制显示x轴所有1-6的标签
 scale_x_discrete(breaks = c("1", "2", "3", "4", "5", "6")) +
 theme_minimal()

bargraph

关键调整说明： #

• 修改分组顺序：
  ggplot默认会对字符型分组变量按字母顺序排序（A→B→C），我们通过把alphabet转换成指定水平的因子，明确告诉ggplot我们想要的顺序是A→C→B，这是控制分组顺序最直接可靠的方法。

• 调整x轴标签：
  使用scale_x_discrete(breaks = ...)强制指定x轴要显示的标签值，这里我们列出了所有1到6的类别，确保每个标签都能完整展示。如果你的原始图表中部分标签被省略，大概率是ggplot自动做了简化，用这个参数就能强制全部显示。

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