r - 如何在 knit_child 中使用 envir 参数？

Question

我正在编写一个 R 包，其中有这样一个 Rmd 模板:

child.Rmd:

```{r}
print(x)
```

还有这样一个函数:

child <- function(){
  myenv <- new.env()
  assign("x", 0, envir=myenv)
  # knit: 
  output <- knit_child("child.Rmd", envir=myenv)
  return(output)
}

然后我编织了这样一个文件:

```{r, echo=FALSE}
library(mypackage)
```

`r child()` 

但这不起作用，输出是:

print(x)
## Error: object 'x' not found

下面是一个自包含的例子，不涉及任何包，我不知道这是否真的等价，我真正需要的是包结构:

```{r}
child <- function(){
  myenv <- new.env()
  assign("x", 0, envir=myenv)
  # knit: 
  output <- knit_child("child.Rmd", envir=myenv)
  return(output)
}
```

`r child()` 

Answer 1

这应该在 development version 中修复knitr (>= v1.6.3): knit_child() 获得了一个新的参数envir，你可以传递一个任意的环境给它.