ggplot2中调整geom_bar条形图升序/降序排列的实现方法

实现方法 #

你可以直接在ggplot的aes()中临时调整Age的因子水平顺序，不需要修改原数据、也不需要新增额外变量，完全不影响后续添加分组等操作。

方法1：基础R语法实现

age_plt <- ggplot(data = df, aes(x = factor(Age, levels = c("Old", "Young", "Middle"))))
age_plt + geom_bar() + xlab("Age")

这里通过factor()临时指定水平顺序，末尾加xlab("Age")是为了避免x轴名显示为因子转换的完整代码，保持轴名正常展示。

方法2：forcats包实现（更简洁，tidyverse生态原生适配）

forcats是tidyverse系列中专门处理因子的包，和ggplot2兼容性更好：

library(forcats)
age_plt <- ggplot(data = df, aes(x = fct_relevel(Age, "Old", "Young", "Middle")))
age_plt + geom_bar() + xlab("Age")

后续添加Gender分组的示例 #

以上两种方法都支持直接叠加分组逻辑，比如绘制按Gender分组的堆叠条形图：

age_plt + geom_bar(aes(fill = Gender)) + xlab("Age")

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