r - R/RMarkdown 中双花括号内变量的使用

Question

来自 this question ，我收集了 {{var}} 形式的变量可以在其他编程语言中被称为回声，但我不知道为什么他们会做他们在 R 中所做的事情。

即，我在 RMarkdown 模板(此处为 state_template.Rmd )中使用了它们，该模板作为输入输入到 for在另一个脚本中循环。

用另一个脚本中定义的向量元素填充“占位符”文本的示例:

Dear `r paste(contacts$firstname[contacts$state == {{eachstate}}], sep = ", ")`,`

这将计算为 allstates 的每个状态中的联系人的名字。传递给 for环形。

allstates <- state.abb

for (eachstate in allstates) {
    knit2html(input  = 'state_template.Rmd',
....
}

Answer 1

在您的情况下，{{ }}完全没有特别的意义。你会得到相同的结果

Dear `r paste(contacts$firstname[contacts$state == eachstate], sep = ", ")`,

例如，在 R 中，这些是等价的

a<-1:10
a[a%%2==1]
a[a%%2=={{1}}]
a[a%%2==((1))]

您可以添加额外的括号/大括号，而无需更改 R 中代码的含义。因此，在您的情况下，运行

sampleRmd<-'Dear `r paste(contacts$firstname[contacts$state == eachstate], sep = ", ")`'
knit(text=sampleRmd, quiet=T)

会一样的。就像 contacts变量被解析为您当前的环境， eachstate 也是如此。多变的。使用或不使用大括号没有区别。如果直接调用解析内联代码块的函数，可能会更明显

knitr:::parse_only('paste(contacts$firstname[contacts$state == {{eachstate}}], sep = ", ")')
# expression(paste(contacts$firstname[contacts$state == {
#     {
#         eachstate
#     }
# }], sep = ", "))

问题是双括号经常用于"template"语言和 knitr。确实允许您定义此类模板。这些模板基本上是文本 block ，您可以在其中将文本中的值替换为 R 中当前范围内的变量值。此替换由 knit_expand() 完成。功能。这是您的情况的一个最小示例

sampleRmd<-'Dear `r paste(contacts$firstname[contacts$state == {{eachstate}}], sep = ", ")`'

contacts <- data.frame(
    firstname=c("Adam","Becky","Clement","David"),
    state=c("MI","CA","CA","MI")
)

eachstate <- "MI"
res <- knit_expand(text=sampleRmd)
res
# [1] "Dear `r paste(contacts$firstname[contacts$state == MI], sep = \", \")`"

基本上它只是寻找 {{ 之间的任何东西。和 }}并将其替换为同名变量的值。在这种情况下是替换 {{eachstate}}与 eachstate 的当前值变量是 "MI"在这个例子中。这是在执行 R 代码之前完成的。请注意，如果您尝试 knit()这你会得到一个错误

knit(text=res)
# Error in NextMethod("[") : object 'MI' not found

这是因为expand 函数已经把MI 的字面值作为一个字符串放入代码中。它没有引用该值。您必须将模板更改为

sampleRmd<-'Dear `r paste(contacts$firstname[contacts$state == "{{eachstate}}"], sep = ", ")`'
res <- knit_expand(text=sampleRmd)
knit(text=res, quiet=T)
# [1] "Dear Adam, David"

但是在您的示例中，您没有利用任何模板功能。您基本上只是在 R 表达式中添加了不必要的符号。