r - 在Markdown PDF中，如何在每次for循环迭代后添加分页符？

例如，如果我的数据框是：

 exampledf <- data.frame(column = c("exampletext1", "exampletext2",  "exmapletext3"))

我希望第一页具有“ exampletext1”，第二页具有
“ exampletext2”等

\pagebreak的工作原理：

```{r, echo=FALSE}; exampledf[1,]```
   \pagebreak
```{r, echo=FALSE} exampledf[2,]```

但是我的数据框太大，无法实用。

我真的需要遍历我所有的价值观：

for(i in 1:NROW(exampledf)) {
  single <- exampledf[i]
  strwrap(single, 70))
}

我意识到这是一个奇怪的问题。

最佳答案

您可以将\\newpage放在cat函数中，以在每次循环迭代后添加分页符。块还需要具有参数results="asis"。例如，为您执行以下操作：

```{r echo=FALSE, results="asis", warning=FALSE}
library(xtable)

exampledf <- data.frame(column = c("exampletext1", "exampletext2",  "exmapletext3"))

for (i in 1:nrow(exampledf)) {

  # Just added this as another way of displaying a row of data
  print(xtable(exampledf[i, , drop=FALSE]), comment=FALSE)

  print(strwrap(exampledf[i,], 70))

  cat("\n\\newpage\n")

}

```