R语言gt包中cols_width不符合预期时，如何指定各列宽度？

问题原因 #

开启row_group.as_column = TRUE后，gt会自动新增一个分组列（默认列名为row_group）作为表格的第一列，原数据的列顺序会整体后移。如果直接用原数据列名设置宽度，会出现列对应错位，甚至无法访问最后一列的情况。

解决方法 #

核心是针对gt实际生成的列结构设置宽度，以下两种方式均可：

方式1：按实际列名设置

先明确gt生成的列顺序：row_group（分组列）→ names（空列）→ A/B/C/D（数据列），再逐个指定宽度：

library(gt)

# 构造模拟数据（匹配你的表格结构）
df <- expand.grid(
  measures = c("指标组1", "指标组2"),
  names = "",
  A = round(rnorm(4), 2),
  B = round(rnorm(4), 2),
  C = round(rnorm(4), 2),
  D = round(rnorm(4), 2)
)

# 生成表格并设置列宽
df %>%
  gt(groupname_col = "measures") %>%  # 指定measures为分组依据
  tab_options(row_group.as_column = TRUE) %>%  # 开启分组列显示
  cols_names(row_group = "分组") %>%  # 可选：给分组列重命名
  cols_width(
    row_group ~ px(120),  # 分组列设为适中宽度
    names ~ px(20),       # 空列设为最窄
    A ~ px(80),
    B ~ px(80),
    C ~ px(80),
    D ~ px(80)            # 正常访问D列并设置统一宽度
  )

方式2：按列位置设置（更简洁）

如果不想记忆列名，直接用列的位置索引批量设置：

df %>%
  gt(groupname_col = "measures") %>%
  tab_options(row_group.as_column = TRUE) %>%
  cols_width(
    1 ~ px(120),    # 第1列：分组列
    2 ~ px(20),     # 第2列：空列names
    3:6 ~ px(80)    # 第3-6列：A-D数据列，统一宽度
  )

关键提示 #

• 可以用gt_table %>% cols_get()查看当前表格的所有列名，确认列结构是否符合预期
• 宽度单位除了px（像素），还可以用pct（百分比），比如3:6 ~ pct(18)，可根据需求灵活调整

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