Jak w inteligentny sposób dodać \ newpage do Rmarkdown?

Zastanawiam się, czy można po prostu użyć \newpagepolecenia LaTeX w R Markdown v2 w inny sposób niż ten:

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

Produkuję pdf_output. Jeśli ktoś ma jakiś pomysł, nie wahaj się skomentować :)! Dzięki

Tworzę pdf w ten sposób:

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

Po prostu \newpagealbo \pagebreakzadziała np

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

To rozwiązanie zakłada, że ​​robisz na drutach plik PDF. W przypadku HTML podobny efekt można osiągnąć, dodając tag <P style="page-break-before: always">. Zwróć uwagę, że prawdopodobnie nie zobaczysz podziału strony w przeglądarce (HTML nie ma stron jako takich), ale układ drukowania będzie go miał.

W porcji inicjalizacyjnej definiuję funkcję

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

W części dotyczącej promocji, w której chcę wstawić podział strony, piszę

`r pagebreak()`

Możesz uzależnić podział strony od robienia na drutach pliku PDF. To zadziałało dla mnie.

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