如何调整ggplot中按月分面的图表顺序（2023年12月与2024年1月）

要让分面按「12月在前、1月在后」的顺序排列，核心是手动指定Msc字段的因子水平顺序——因为ggplot默认会按因子的自然排序（字母/数字升序）展示分面。以下是两种可行的修改方式：

方法1：在数据预处理阶段修改因子水平 #

在filter之后添加mutate语句，将Msc转换为指定顺序的因子：

ggplot (Energy.day %>% 
          filter(Date >= as.Date("2023-12-01") & Date <= as.Date("2024-01-31")) %>%
          mutate(Msc = factor(Msc, levels = c("12", "1"))) # 若Msc是带后缀的文本（如"12月"），则改为c("12月", "1月")
        )+
  geom_col (aes (x = Day_Month, y = Energy), fill = "green3", size = 0.5) +
  scale_x_date (breaks = "3 day",
                date_labels = "%d") +
  theme(axis.text.x = element_text(angle = 90, vjust = 0.5),
        legend.position = "none",
        legend.justification = "center") +
  labs (x = "", y = "Energy [kWh]", fill = "") +
  facet_wrap(~Msc)

方法2：直接在facet_wrap中指定因子顺序 #

如果不想修改原始数据，可以在分面时直接将Msc转换为指定顺序的因子：

ggplot (Energy.day %>% filter (Date >= as.Date("2023-12-01") & Date <= as.Date("2024-01-31")))+
  geom_col (aes (x = Day_Month, y = Energy), fill = "green3", size = 0.5) +
  scale_x_date (breaks = "3 day",
                date_labels = "%d") +
  theme(axis.text.x = element_text(angle = 90, vjust = 0.5),
        legend.position = "none",
        legend.justification = "center") +
  labs (x = "", y = "Energy [kWh]", fill = "") +
  facet_wrap(~factor(Msc, levels = c("12", "1"))) # 同样根据Msc实际取值调整levels

关键说明 #

• 请严格匹配Msc字段的实际存储格式调整levels参数：如果是数字就用数字向量，是带月份后缀的文本就用对应文本向量。
• 这种方式通过强制指定因子的水平优先级，让ggplot按照你需要的顺序渲染分面。

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