如何在R语言formattable表格中隐藏多个指定列的列名？

formattable完全可以实现隐藏指定列标题的需求，你之前尝试设置空格列名被自动转换为X.的问题，根源是R对数据框合法列名的强制校验逻辑导致的。

问题根源说明 #

R要求数据框的列名必须是符合语法规则的合法字符串，空字符串、纯空格列名在数据框初始化或读取阶段，就会被自动转换为X.开头的占位名，提前修改原始数据框列名的思路从流程上就会触发这个自动处理，无法直接通过这种方式得到空白列名。

核心实现思路 #

绕开原始数据框的列名校验流程，把列名的自定义渲染环节放到formattable的生成阶段完成：

• 为需要隐藏标题的两列设置合法的临时占位列名，保证数据框创建阶段不会触发自动列名替换
• 调用formattable时，使用内置的col.names参数按列顺序指定实际展示的文本内容，将需要隐藏的列对应的展示文本设为空字符串即可。这个环节的渲染不会触发R的列名合法性校验，空字符串不会被自动转换为X.。

完整可运行代码示例 #

library(formattable)
df <- data.frame(
  "temp_site" = rep(c("1", "2"), 3),
  "temp_variable" = c("C", "C", "O", "O", "N", "N"),
  "msmt1" = runif(6),
  "msmt2" = runif(6),
  "msmt3" = runif(6)
)

formattable(
  df,
  # 按列顺序指定显示文本，前两列对应设为空字符串实现标题隐藏
  col.names = c(
    "",
    "",
    "msmt1",
    "msmt2",
    "msmt3"
  )
)

低侵入性扩展方法 #

如果在R Markdown、Shiny等支持自定义样式的渲染场景中，还可以通过CSS规则直接定位目标列的标题单元格，将其内容隐藏。这种方式不需要给原始数据框设置临时占位列名，完全保留原有数据结构，渲染时不会出现列名临时替换的中间过程。

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