例如,我希望对某个函数的输出结果应用 results='asis
, 但不想直接代码块中设置,而是在函数中调用,如
my_func <- function() {
old_knitr_results <- knitr::opts_chunk$get("results")
knitr::opts_chunk$set(results="asis")
on.exit(knitr::opts_chunk$set(results = old_knitr_results))
# ... 下面代码的输出结果希望使用 results = 'asis'
# ...
}
随后在代码块中
```{r}
my_func()
```
但是实际运行后 my_func
第二行设置 knitr 选项的代码并没有奏效,可能是编译到这一步时的代码选项已经被固定了?