R语言grid.table/tableGrob特定列高亮问题：仅表头生效

我来帮你搞定这个问题！你遇到的情况是因为grid.table的主题设置里，表头（列标题）和数据单元格的样式是分开控制的——你现在只给表头的背景色设了值，数据列的背景色没同步配置，所以只有表头亮了。

完整解决方案代码 #

首先确认你的列颜色配置（对应RMSE和MAPE列的位置设为黄色，其他列浅灰），然后在自定义主题时同时指定表头和数据单元格的背景色：

library(gridExtra)
library(grid)

# 定义每一列的背景色，按列顺序对应，RMSE（第3列）、MAPE（第6列）设为黄色
cols <- c("grey90","grey90", "yellow", "grey90","grey90", "yellow", "grey90", "grey90", "grey90", "grey90")

# 创建自定义主题：同步设置表头和数据列的样式
custom_theme <- ttheme_default(
  # 表头样式：文字黑色，背景色用cols向量
  colhead = list(
    fg_params = list(col = "black"),
    bg_params = list(fill = cols, col = "black", lwd = 1)  # lwd设置边框宽度，可选
  ),
  # 数据单元格样式：文字黑色，背景色同步用cols向量
  core = list(
    fg_params = list(col = "black"),
    bg_params = list(fill = cols, col = "black", lwd = 1)
  )
)

# 使用自定义主题导出表格
grid.table(your_data_frame, theme = custom_theme)

关键说明 #

• 确保cols向量的长度和你的数据框列数完全一致，每一个元素对应一列的背景色
• lwd参数是可选的，用来设置单元格边框的粗细，让表格看起来更清晰
• 如果需要调整文字样式（比如字体大小），可以在fg_params里添加fontsize参数，比如fontsize=10

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