在不创建RMarkdown输出的情况下，从另一个.rmd内部运行.rmd (.rmd)

Question

我正在使我的代码更模块化，并希望运行多个RMarkdown文件从一个整体RMarkdown。我相信，如果我将所有的RMarkdown文件翻译成.R脚本并使用source()，我就能做到这一点，但我喜欢RMarkdown的文档性质，我可以用纯文本描述我正在做的事情。

其目标是对数据进行争用并导出一个可用的.sav文件。我想从clean.rmd运行run.rmd，但是我不想要任何HTML/pdf/等等输出。删除YAML头中的输出行并不会阻止输出。如果有一种方法可以做到这一点，而无需将所有内容转换为.R脚本，我将非常感激。谢谢。

clean.rmd:执行清理操作的脚本

---
title: "clean"
author: "jrcalabrese"
date: "12/30/2021"
output: html_document
---

```{r}

图书馆(Tidyverse)

图书馆(港湾)

```{r}

数据(汽车)

cars <- cars %>%

变异(newvar=速度+ dist)

```{r}

write_spss(cars，"~/Documents/cars_new.sav"，compress = FALSE)

run.rmd:运行clean.rmd的脚本

---
title: "run"
author: "jrcalabrese"
date: "12/30/2021"
output: html_document
---

```{r}

rmarkdown：：呈现(“~/Documents/lean.rmd”)

Answer 1

谢谢你的帮助!这一职能起着以下作用：

---
title: "run"
author: "jrcalabrese"
date: "12/30/2021"
#output: html_document
---

```{r}

source_rmd =函数(文件.){

tmp_file = tempfile(fileext=".R")

on.exit(unlink(tmp_file)，add = TRUE)

针织品：：purl(档案，output=tmp_file)

源文件(file= tmp_file，.)

}

```{r}

Source_rmd(“~/Documents/lean.rmd”)