如何避免body_add_flextable插入的flextable跨页时重复表头？

GitHub版本的officer确实支持通过body_add_flextable()实现表格跨页显示，默认情况下跨页后的每一页会重复表头，这是可配置的特性，并非未实现的功能。

要避免重复表头，只需在创建flextable对象后，调用set_table_properties()函数并将header_row参数设为FALSE即可：

library(officer)
library(flextable)

# 生成一个足够长的测试数据框
long_table_data <- data.frame(
  列1 = rep("示例内容", 60),
  列2 = rep("测试文本", 60)
)

# 创建flextable对象
my_table <- flextable(long_table_data)

# 禁用跨页重复表头
my_table <- set_table_properties(my_table, header_row = FALSE)

# 将表格添加到Word文档并保存
doc <- read_docx()
doc <- body_add_flextable(doc, my_table)
print(doc, target = "无重复表头的跨页表格.docx")

这段代码会生成一个跨页时不重复表头的Word表格。需要确保你安装的是GitHub最新版的officer和flextable包，以保证该功能正常工作。

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