如何按H01、H02、H03分组拆分图表列？facet_wrap使用遇阻求助

核心原因 #

出现9个面板，通常是因为传给facet_wrap()的变量并非直接的H01/H02/H03分组，而是包含了更细分的层级（比如每个Hxx下还有3个子类别，导致生成9个组合面板）。

解决方案 #

• 先整理数据格式
  如果你的数据是宽格式（H01、H02、H03是单独列名），需要先转成长格式，把列名转换为统一的分组变量：

  library(tidyr)
  # wide_data是你的原始宽格式数据
  long_data <- pivot_longer(wide_data, 
                            cols = starts_with("H"), 
                            names_to = "group", 
                            values_to = "value")
  

  转换后group列只会包含H01、H02、H03三个取值。

• 正确调用facet_wrap
  用整理好的分组变量传入函数，同时设置nrow = 1让面板在同一行展示：

  library(ggplot2)
  ggplot(long_data, aes(x = 子类别列名, y = value)) +
    geom_col() +
    facet_wrap(~ group, nrow = 1)
  

• 替代方案：facet_grid
  若需要更精准的布局控制，也可以用facet_grid()实现单行分面：

  ggplot(long_data, aes(x = 子类别列名, y = value)) +
    geom_col() +
    facet_grid(. ~ group)
  

关键提醒 #

务必确认分面用的group变量只有H01、H02、H03三个取值，不存在带后缀的细分分类（比如H01a、H01b这类）。

内容的提问来源于stack exchange，提问作者Alexandra León