在 for 循環中呈現時，Flextables 會粘附

Question

當我在我的 rmarkdown 筆記本中以 for 循環呈現它們時，我正在努力處理彼此粘附的 flextables。 output 是 docx（准確地說是 officedown::rdocx_document）。 這是我的代碼：

dt <- head(iris)
for (i in 1:10) {
  flextable_to_rmd(flextable(dt))
}

結果是一組 flextables，但它們之間沒有任何空間，當表格跨越兩頁時會導致問題。 對於更復雜的表格，它變得不可讀。

我發現的唯一解決方法是將cat("--")添加為 for 循環內的 las 行。 有更優雅的解決方案嗎？

Answer 1

此代碼允許您在每個表格后添加一個空的 Word 段落。

---
title: "Untitled"
output: word_document
---

```{r results='asis'}
library(flextable)
dt <- head(iris)
for (i in 1:10) {
  flextable_to_rmd(flextable(dt), text_after = "<w:p/>")
}
```