在Shiny仪表盘中移除Tibble的列标题

你不用纠结修改数据框列名的事儿，R里的数据框其实没法彻底去掉列名（就算设colnames(df) <- NULL，也会自动生成V1、V2这类默认名）。真正的解决方案是在renderTable的参数里直接控制列标题的显示：

直接在renderTable中隐藏列标题 #

修改你的代码，给renderTable加上colnames = FALSE参数就行，完整代码如下：

output$rain_data <- renderTable({
  df <- tibble(
    . = c("Project ID", "Project Name", "Project Type", "Percent Chance of Rain", 
          "Predicted Rain Days", "Predicted 7-day precipitation (in)", 
          "7-day accumulated precipitation (in)"),
    .. = c("123", "123", "123", "123","123","123", "123")
  )
  df
}, colnames = FALSE) # 关键：这里设置隐藏列标题

可选：优化表格对齐方式 #

如果想让键值对显示更美观，比如第一列左对齐、第二列右对齐，可以再加个align参数：

output$rain_data <- renderTable({
  df <- tibble(
    . = c("Project ID", "Project Name", "Project Type", "Percent Chance of Rain", 
          "Predicted Rain Days", "Predicted 7-day precipitation (in)", 
          "7-day accumulated precipitation (in)"),
    .. = c("123", "123", "123", "123","123","123", "123")
  )
  df
}, colnames = FALSE, align = "lr") # l=左对齐，r=右对齐

这样渲染出来的表格就不会显示那些无意义的列标题了，完全符合你要的长格式键值对展示效果。

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