在 Rmarkdown 文件中包含带有 markdown 标签的 R 脚本作为外部文件

Question

假设我有一个带有 markdown 标签的 .R 文件tmp.R ，例如

#' # header    
5+1

我想将它包含在一个（更大的） .Rmd文件中作为外部源。 R 代码和 markdown 标签应像直接渲染一样进行评估。 我会怎么做？

---
title: "Untitled"
output: html_document
---

我玩了几个选项，包括

```{r, results='asis'}
source("tmp.R")
```

或者

```{r, results='asis'}
knitr::spin("tmp.R')
```

和其他几个。 不幸的是，我没有在 stackoverflow 上找到解决方案，包括this 、 this 、 this 、 this或this question。

Answer 1

我不完全确定我是否理解您的问题，但听起来您正在寻找knitr::spin_child() ，它将 R 脚本转换为 Rmd 并将其编织为子文档：

```{r}
knitr::spin_child('tmp.R')
```

Answer 2

您需要在temp.R文件中编写代码，以便可以直接在块中对其进行评估。

所以对于 tmp.R 使用：

cat("# header \n\n")
cat(4+3)

然后您可以将其包含在 R-Markdown 文件中：

```{r, results='asis'}
source("tmp.R")
```