如何在R Markdown中打印列表中的flextable表格？

在R Markdown生成Word文档时，直接用print循环无法正确渲染flextable，return也只会返回第一个表格，解决核心是用flextable_to_rmd函数输出表格对应的渲染代码，以下是两种可行方式：

• 使用purrr包的walk函数遍历列表：

  library(flextable)
  library(purrr)
  
  # 处理dat_list[[2]]中的所有flextable
  walk(dat_list[[2]], flextable_to_rmd)
  

  walk专注执行副作用操作，不会返回结果，而是对列表里每个flextable调用flextable_to_rmd，这个函数会输出R Markdown能识别的表格代码，保证Word中正常渲染。

• 用基础for循环实现：

  library(flextable)
  
  for (tbl in dat_list[[2]]) {
    flextable_to_rmd(tbl)
  }
  

  原理和上面一致，手动遍历每个flextable，调用flextable_to_rmd输出渲染代码。

如果不想展示代码，可将R代码块的echo参数设为FALSE，比如：

```{r echo=FALSE}
# 这里放上述处理代码

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