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

Question

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

 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))
}

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

Answer 1

您可以在函数\\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")

}

```