Wie füge ich \ newpage in Rmarkdown auf intelligente Weise hinzu?

Ich frage mich, ob man den LaTeX- \newpageBefehl in R markdown v2 einfach anders verwenden könnte:

```{r, results='asis', echo=FALSE}
cat("\\newpage")
```

Ich produziere pdf_output. Wenn any1 eine Idee hat, zögern Sie bitte nicht zu kommentieren :)! Vielen Dank

Ich erstelle PDF wie folgt:

---
title: " "
author: " "
date: "2014"
output: 
   pdf_document:
      includes:
         in_header: naglowek.tex
      highlight: pygments
      toc: true
      toc_depth: 3
      number_sections: true
      keep_tex: true
---

Einfach \newpageoder \pagebreakwird funktionieren, z

hello world
\newpage
```{r, echo=FALSE}
1+1
```
\pagebreak
```{r, echo=FALSE}
plot(1:10)
```

Diese Lösung setzt voraus, dass Sie PDF stricken. Bei HTML können Sie einen ähnlichen Effekt erzielen, indem Sie ein Tag hinzufügen <P style="page-break-before: always">. Beachten Sie, dass in Ihrem Browser wahrscheinlich kein Seitenumbruch angezeigt wird (HTMLs haben keine Seiten an sich), das Drucklayout jedoch.

Im Initialisierungsblock definiere ich eine Funktion

pagebreak <- function() {
  if(knitr::is_latex_output())
    return("\\newpage")
  else
    return('<div style="page-break-before: always;" />')
}

In den Markdown-Teil, in den ich einen Seitenumbruch einfügen möchte, gebe ich ein

`r pagebreak()`

Sie können den Seitenumbruch vom Stricken in PDF abhängig machen. Das hat bei mir funktioniert.

```{r, results='asis', eval=(opts_knit$get('rmarkdown.pandoc.to') == 'latex')}
cat('\\pagebreak')
```