使用kableExtra生成PDF时如何让表头单元格背景完全填充

你遇到的背景填充不全问题，核心原因是**booktabs = TRUE启用的booktabs格式与单元格背景填充不兼容**——booktabs通过添加间距替代传统表格的竖线和紧密单元格布局，导致背景色无法铺满整个单元格区域。下面是具体的修复方案：

修复步骤及代码 #

直接修改你的代码，调整表格格式相关参数即可：

---
title: "Test Doc"
output: pdf_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(
  echo = FALSE,
  message = FALSE,
  warning = FALSE,
  dev = "cairo_pdf"
)

library(tidyverse)
library(kableExtra)

set.seed(1)

df <- data.frame(
  id = LETTERS[1:10],
  var1 = rnorm(10, 50, 10),
  var2 = rnorm(10, 50, 10),
  var3 = rnorm(10, 50, 10),
  var4 = rnorm(10, 50, 10),
  var5 = rnorm(10, 50, 10),
  var6 = rnorm(10, 50, 10),
  grp = rep(paste("Group", 1:2), each = 5)
)

kbl(df[1:7],
    # 移除booktabs，改用默认表格格式
    escape = FALSE,
    align = c("l", rep("c", ncol(df) - 1)),
    linesep = ""  # 消除行之间的默认间距
) %>%
  kable_styling(latex_options = c("HOLD_position"),
                font_size = 8,
                full_width = TRUE) %>%  # 让表格占满页面宽度，确保背景填充完整
  add_header_above(c(" " = 1, "colgroup1" = 3, "colgroup2" = 3), 
                   background = "black",
                   color = "white", 
                   bold = TRUE) %>%
  row_spec(row = 0, 
           background = "black", 
           color = "white", 
           bold = TRUE) %>%
  pack_rows(index = table(fct_inorder(df$grp)), 
            background = "#ED1B2F",
            color = "white", 
            bold = TRUE, 
            extra_latex_after = "\\hline{}")  # 替换midrule为hline，适配非booktabs格式

关键修改说明 #

1. 移除booktabs = TRUE：booktabs的规则会在单元格间产生空隙，导致背景色无法铺满，改用默认的tabular格式即可解决。
2. 添加linesep = ""：消除行与行之间的默认空白间距，让背景色连续填充。
3. 启用full_width = TRUE：强制表格宽度占满页面，确保每列的背景色都能填充到单元格边缘。
4. 替换分隔线命令：将pack_rows中的\midrule{}换成\hline{}，保持分组后的分隔线效果，同时适配新的表格格式。

如果需要更精细的列宽控制，可以在kable_styling后添加column_spec()来指定每列宽度，比如：

column_spec(1:7, width = "1.2cm")

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