使用ggplot2时如何将日期按从新到旧排序？

你遇到的问题很常见——直接把日期转成有序因子但没指定正确的水平顺序，所以ggplot还是按默认的字符顺序来排列了。下面给你两种靠谱的解决方案：

方案1：修改数据，将日期转为指定顺序的有序因子 #

首先得确保你的日期列是真正的日期类型（如果之前是字符串的话），然后手动指定有序因子的水平为从新到旧的日期序列：

# 第一步：将字符型日期转为日期类型（格式根据你的实际日期格式调整，比如"%d/%m/%Y"）
my_data$Datum <- as.Date(my_data$Datum, format = "%Y-%m-%d")

# 第二步：生成从新到旧的日期顺序，作为有序因子的水平
date_levels <- rev(sort(unique(my_data$Datum)))
my_data$Datum <- factor(my_data$Datum, levels = date_levels, ordered = TRUE)

这样处理后，ggplot绘图时就会按照你指定的从新到旧顺序排列日期了。

方案2：直接在ggplot中指定x轴顺序（无需修改原始数据） #

如果你不想改动原始数据，可以在绘图时通过scale_x_date直接设置x轴的范围为倒序：

ggplot(my_data, aes(x = Datum, y = 你的y轴列名)) +
  # 你的其他图层（比如geom_bar、geom_line等）
  geom_line() +
  # 设置x轴日期从新到旧排列
  scale_x_date(limits = rev(range(my_data$Datum)))

这个方法更灵活，尤其适合临时调整排序的场景。

为什么你之前的代码没生效？因为factor(my_data$Datum, ordered = T)只是标记它为有序因子，但默认的水平顺序是字符排序（比如"2023-01-01"会排在"2022-12-31"前面，因为字符比较是从左到右），而不是日期的逻辑先后顺序，必须手动指定levels参数才能得到正确的排序。

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