如何在for循环中输出paged_table（）（使用spin（）从R代码生成Rmd）

Question

我想出了如何使用pander程序包将for循环吐出Rmd，例如：

library(pander)
panderOptions('knitr.auto.asis', FALSE)
##+ results = 'asis'
for (df in dfs) {
    pandoc.header("header text", 1) %>% cat()
    df %>% pandoc.table(align="left") %>% cat()
}

但是我想使用rmarkdown包输出paged_table（）。在循环外就可以正常工作！

感谢您的帮助！