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

Question

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

#' # header    
5+1

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

---
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")
```