如何从R无缝导出使用tabularx环境的长表格至LaTeX

解决方案 #

1 无需手动gsub处理tabularx宽度的实现 #

kableExtra自1.3.0版本已原生支持tabularx环境的宽度指定，不需要手动正则替换列宽参数。你只需要在kable_styling()中新增tabularx_width = "\\linewidth"参数，系统会自动在tabularx环境声明后插入宽度定义，生成的LaTeX代码可直接编译。

2 脚注移动到\endfoot之前的实现 #

你可以新增一行简单的正则替换，将原本位于\endlastfoot前的脚注内容批量移动到\endfoot前，即可实现每页表格底部都显示脚注，而非仅在表格最后一页显示。

3 可选替代包 #

如果不想使用kableExtra+正则的方案，也可以选择以下两个包实现需求：

• gt包：RStudio官方推出的标准化表格包，导出LaTeX时可直接指定使用tabularx环境，原生支持长表格、重复表头、脚注位置配置，语法更统一，不需要手动修改生成的代码。
• flextable包：支持直接输出适配longtable的tabularx格式，脚注位置可通过函数参数直接指定，无需额外处理。

修改后的可运行最小示例 #

library(dplyr)
library(kableExtra)

islands %>%
  as_tibble(rownames = "Landmass") %>%
  rename(Area = value) %>%
  kbl("latex", align = c("X", "l"), 
      caption = "Area of World's major landmasses", label = "islands", 
      booktabs = TRUE, longtable = TRUE) %>%
  kable_styling(latex_options = "repeat_header", 
                latex_table_env = "tabularx",
                tabularx_width = "\\linewidth") %>%
  footnote(c("Area shown in thousands of sq mi.", 
             "Includes landmasses with areas larger than 10,000 sq mi."), 
           general_title = "Notes:") %>%
  # 仅需一次替换调整脚注位置
  gsub("\\\\endfoot\n\\\\bottomrule\n(.*?)\\\\endlastfoot", 
       "\\\\bottomrule\n\\1\n\\\\endfoot\n\\\\endlastfoot", .) %>%
  print()

内容的提问来源于stack exchange，提问作者Lucas De Abreu Maia