r - 在RMarkdown中的图形周围添加空间

我想在RMarkdown中的图形周围添加空间。我正在编织PDF，但实际上不喜欢数字(或方程式)与文本或下一个数字的距离如此之近。

---
output: pdf_document
---

```{r pressure, echo=FALSE}
plot(pressure)
```

```{r pressure2, echo=FALSE}
plot(pressure)
```

两幅图之间的空间太小，使用ggplots时变得更加模糊。

现在我用乳胶溶液

\vspace{10pt}

但是如果我可以为整个文档进行全局设置，那将是很好的。

最佳答案

关于绘图前后的间距，可以使用简单的编织钩:

```{r, echo = F}
library(knitr)
if(is_latex_output()) {
  plot_default <- knit_hooks$get("plot")
  knit_hooks$set(plot = function(x, options) {
    x <- c(plot_default(x, options), "\\vspace{25pt}")
  })
}
```

在这里，我们从某种意义上更改了绘图钩子，即在每个绘图输出之后仅添加了25pt间距。

关于方程式，您只需在文档开头添加以下四个长度定义:

\setlength{\abovedisplayskip}{25pt}
\setlength{\belowdisplayskip}{25pt}
\setlength{\abovedisplayshortskip}{25pt}
\setlength{\belowdisplayshortskip}{25pt}

前两个变更方程是使用align环境创建的。后两个是使用$$ ... $$创建的。