如何用kableExtra的cell_spec()填充表格整单元格背景？

要让cell_spec()的背景色填充整个单元格，核心是给单元格添加足够内边距，确保背景色能覆盖单元格全部区域，以下是两种可行方案：

方案1：在cell_spec()中直接设置内边距 #

通过cell_spec的padding参数定义单元格内边距，让背景色铺满整个单元格：

library(kableExtra)
library(dplyr)

name <- paste("Name", LETTERS)
val <- rnorm(26, 100, 50)
d <- data.frame(name, val)

# 计算均值与标准差
mean_val <- mean(d$val)
sd_val <- sd(d$val)

d$val <- cell_spec(
  d$val, 
  background = if_else(d$val > mean_val + sd_val, "#DBEBF6",
                       if_else(d$val < mean_val - sd_val, "#FEE7DA", "transparent")),
  padding = "8px 12px"  # 自定义上下左右内边距，适配表格样式
)

kbl(d, escape = FALSE) %>%
  kable_styling(full_width = FALSE)

方案2：结合column_spec()统一控制列样式 #

如果需要更规整的列布局，可通过column_spec给目标列设置固定宽度和统一内边距，配合cell_spec实现背景填充：

library(kableExtra)
library(dplyr)

name <- paste("Name", LETTERS)
val <- rnorm(26, 100, 50)
d <- data.frame(name, val)

mean_val <- mean(d$val)
sd_val <- sd(d$val)

d$val <- cell_spec(
  d$val, 
  background = if_else(d$val > mean_val + sd_val, "#DBEBF6",
                       if_else(d$val < mean_val - sd_val, "#FEE7DA", "transparent"))
)

kbl(d, escape = FALSE) %>%
  kable_styling() %>%
  column_spec(2, width = "100px", padding = "8px 12px")  # 对第2列设置宽度与内边距

补充说明 #

• padding参数可灵活调整，比如"10px"表示上下左右均为10像素内边距，"6px 10px"表示上下6像素、左右10像素；
• 若设置full_width = TRUE让表格占满容器宽度，配合column_spec定义列宽能获得更稳定的背景填充效果。

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