LaTeX格式松鼠观测表格排版及保存问题求助

我有一份包含松鼠观测数据的表格，字段包括物种、年份、总丰度等，数据生成代码如下：

library(tibble)

set.seed(42)  

abundance_sum <- tibble(
  Species = sample(c("Sciurus vulgaris", "Tamias striatus", "Marmota monax", "Sciurus niger", "Glaucomys volans"), 100, replace = TRUE),
  Year = sample(2015:2023, 100, replace = TRUE),
  Total_abundance = round(runif(100, 1, 500), 1),
  n_observations = sample(1:10, 100, replace = TRUE))

print(abundance_sum)

我偏好LaTeX风格的表格，该表格在Markdown编织时可正常显示，但因内容过长无法完整展示在单页。我使用以下代码生成LaTeX表格：

abundance_sum %>%
  arrange(Species, Year) %>%
  select(Year, Total_abundance, n_observations) %>%
  kbl(format="latex", booktabs = T) %>%
  kable_styling(latex_options = c("striped", "hold_position")) %>%
  pack_rows(index = table(abundance_sum$Species), label_row = TRUE)
  #%>% 
  #save_kable("kable.pdf")
  
  # this is what I tried to save my table in latex and get it in pdf format

尝试使用save_kable保存为PDF时，出现如下错误：

Error: LaTeX failed to compile /Users/klervilecorre/Desktop/Stage\ M2/Data/kable.tex. See https://yihui.org/tinytex/r/#debugging for debugging tips.

我已按照提示调试TinyTeX，卸载并重装LaTeX（Mac系统），但问题仍未解决。其他格式（如HTML）可正常保存，但不符合我的审美需求。请问是否有其他方法可以生成类似示例图片风格的美观表格？

方法1：修复save_kable的编译问题 #

编译失败大概率是路径含空格或缺失必要LaTeX包导致，按以下步骤处理：

1. 更换无空格的文件路径/文件名，避免LaTeX解析路径出错
2. 安装kableExtra依赖的LaTeX包

# 先安装缺失的LaTeX依赖包
tinytex::tlmgr_install(c("booktabs", "xcolor", "colortbl", "float", "longtable"))

# 重新生成表格并保存（使用无空格路径）
abundance_sum %>%
  arrange(Species, Year) %>%
  select(Year, Total_abundance, n_observations) %>%
  kbl(format="latex", booktabs = T, longtable = TRUE) %>% # 加入longtable实现跨页
  kable_styling(latex_options = c("striped", "repeat_header", "hold_position")) %>% # repeat_header让表头在每页重复
  pack_rows(index = table(abundance_sum$Species), label_row = TRUE) %>%
  save_kable("squirrel_abundance_table.pdf") # 使用无空格文件名

方法2：使用gt包生成类LaTeX风格表格并导出PDF #

gt包生成的表格风格接近LaTeX，且导出PDF的稳定性更强，无需依赖复杂的LaTeX环境配置：

library(gt)

# 生成分组表格，风格对齐LaTeX
squirrel_gt <- abundance_sum %>%
  arrange(Species, Year) %>%
  select(Species, Year, Total_abundance, n_observations) %>%
  gt(groupname_col = "Species") %>% # 按物种分组
  # 配置分组行样式（模拟LaTeX的booktabs粗线）
  tab_style(
    style = list(
      cell_borders(sides = "bottom", weight = px(2), color = "#333333"),
      cell_text(weight = "bold", size = 12)
    ),
    locations = cells_group()
  ) %>%
  # 配置整体表格样式
  tab_options(
    table.border.top.width = px(2),
    table.border.bottom.width = px(2),
    row.striping.background_color = "#f0f0f0", # 条纹行背景
    column_labels.font.weight = "bold",
    column_labels.border.bottom.width = px(1.5)
  ) %>%
  # 格式化数值列
  fmt_number(columns = Total_abundance, decimals = 1)

# 导出为PDF
gtsave(squirrel_gt, filename = "squirrel_gt_table.pdf")

方法3：通过R Markdown直接编织PDF（推荐） #

如果你的最终目标是生成包含该表格的PDF文档，直接在R Markdown中编写代码并编织，可自动处理表格跨页，无需单独保存：
在R Markdown文件中加入以下代码块：

```{r, results='asis'}
library(kableExtra)

abundance_sum %>%
  arrange(Species, Year) %>%
  select(Year, Total_abundance, n_observations) %>%
  kbl(format="latex", booktabs = T, longtable = TRUE) %>%
  kable_styling(latex_options = c("striped", "repeat_header")) %>%
  pack_rows(index = table(abundance_sum$Species), label_row = TRUE)

然后编织为PDF，表格会自动分页，且表头在每页重复显示，完全符合LaTeX风格的排版需求。

---

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