r - 评估 YAML header 中的 R 代码

Question

考虑以下 Rmd 文件，

---
title: "Untitled"
author: "baptiste"
date: "`r Sys.Date()`"
output: html_document
test: "`r paste('_metadata.yaml')`"
---

```{r}
cat(rmarkdown::metadata$test)
```

在传递给 pandoc 以转换为 md 和 html 之前，日期由 R 处理(编织)。自定义字段 test ，但是，未评估。

有什么不同？可以强制 knitr/rmarkdown 评估 yaml header 中的任意字段吗？

注意:实际目的不仅仅是 print()像这个虚拟示例中的文件名，但要加载包含元数据(作者信息)的外部 yaml 文件，用 R 处理它，并输出一个将被注入(inject)到文档中的字符串。

Answer 1

标准元数据字段 data和您的自定义字段 test实际上并没有区别对待。这段代码:

---
title: "Untitled"
author: "baptiste"
date: "`r Sys.Date()`"
output: 
  html_document: 
    keep_md: yes
test: "`r paste('_metadata.yaml')`"
---

```{r}
cat(rmarkdown::metadata$date)
cat(rmarkdown::metadata$test)
```

导致以下输出:

如您所见，还有 date没有被评估。我在 rmarkdown 中没有找到任何功能或 knitr包。但是以下简单函数至少对您的简单示例有用:

---
title: "Untitled"
author: "baptiste"
date: "`r Sys.Date()`"
output: 
  html_document: 
    keep_md: yes
test: "`r paste('_metadata.yaml')`"
---

```{r}
eval_meta <- function(x) eval(parse(text = gsub("`|r", "", x)))
eval_meta(rmarkdown::metadata$date)
eval_meta(rmarkdown::metadata$test)
```

但是，这是否适用于您更复杂的情况是另一个问题。