R Markdown中kable表格如何基于条件给指定单个单元格加粗

可以通过kableExtra的cell_spec函数结合列遍历的条件逻辑实现，完全不需要手动定位单元格，可自动化处理所有目标列的最大值高亮：

核心实现逻辑 #

• 对需要调整样式的列逐行判断是否为该列最大值，符合条件的单元格用cell_spec标记加粗属性
• 生成kable表格时开启escape = FALSE参数，让样式标记正常渲染生效

可运行示例代码 #

# 加载依赖包
library(kableExtra)
library(dplyr)

# 你的原始表格数据（这里用示例数据模拟，替换成你自己的表格即可）
df <- data.frame(
  组别 = c("对照组", "处理1组", "处理2组", "处理3组"),
  number = c(120, 98, 147, 105),
  mean = c(1.89, 2.05, 2.36, 1.76),
  标准差 = c(0.32, 0.28, 0.41, 0.35)
)

# 处理数据：给所有数值列的最大值单元格加加粗标记
# 如果你只需要处理指定列，把where(is.numeric)替换为c(2,3,5:7)这类你需要的列范围即可
df_processed <- df %>%
  mutate(across(where(is.numeric), 
                ~ifelse(.x == max(.x), cell_spec(.x, bold = TRUE), as.character(.x))))

# 生成最终表格，保留你原来的kable_styling样式配置即可，必须加escape = FALSE
df_processed %>%
  kbl(escape = FALSE) %>%
  kable_styling(bootstrap_options = "striped", full_width = FALSE)

扩展说明 #

• 若需要同时高亮背景色，只需修改cell_spec参数，例如cell_spec(.x, bold = TRUE, background = "#fff2cc")即可实现加粗+浅黄背景的高亮效果
• 若存在列内并列最大值，所有并列的最大值单元格会自动同时加粗，无需额外调整逻辑
• 该方法同时兼容HTML输出和LaTeX/PDF输出，cell_spec会自动适配输出格式生成对应样式代码

你原表格的参考效果：

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