r markdown plot всегда на второй странице

Question

Вязать файл уценки на слово. У меня есть 3 сюжета. Первый сюжет всегда помещается на вторую страницу, хотя я изменяю его размер до малого.

Ниже сценария уценки, в котором это происходит

--- 
title: "Melding stats rapportage" 
output: word_document 
--- 
Author: PDG 
```{r echo=FALSE, comment=NA} 
d<-format(Sys.Date(), "%d-%m-%Y") 
dd<- "Date:" 
knitr::kable(paste(dd, d)) 
``` 
```{r setup, include=FALSE} 
knitr::opts_chunk$set(echo = FALSE) 
``` 

```{r fig.width=6, fig.height=6,echo=FALSE} 
library(ggplot2) 
ggplot(pressure, aes(temperature, pressure)) + geom_bar(stat = "identity") 
``` 
```{r fig.width=6, fig.height=6,echo=FALSE} 
library(ggplot2) 
ggplot(pressure, aes(temperature, pressure)) + geom_bar(stat = "identity") 
``` 
```{r fig.width=6, fig.height=6,echo=FALSE} 
library(ggplot2) 
ggplot(pressure, aes(temperature, pressure)) + geom_bar(stat = "identity") 
``` 

Answer 1

Я нашел решение, чтобы убедиться, что графики не начинаются на второй странице. Кажется, что если граф-график помещается непосредственно друг за другом, то результат выводится Markdown как одна часть вместо трех отдельных графиков. Ввод строки между тремя частями графового кода делает Markdown брать 3 графа как единый, и первый график красиво помещается на первой странице.

Исправление в коде, который делает трюк:

```{r fig.width=6, fig.height=6,echo=FALSE} 
library(ggplot2) 
ggplot(pressure, aes(temperature, pressure)) + geom_bar(stat = "identity") 
``` 

```{r fig.width=6, fig.height=6,echo=FALSE} 
library(ggplot2) 
ggplot(pressure, aes(temperature, pressure)) + geom_bar(stat = "identity") 
``` 

```{r fig.width=6, fig.height=6,echo=FALSE} 
library(ggplot2) 
ggplot(pressure, aes(temperature, pressure)) + geom_bar(stat = "identity") 
```