purit()在knit()内重复标签错误

Question

我正在编织一个.Rmd文件,并希望有两个输出:每次运行编织时,html和一个purl'ed R脚本.这可以使用以下Rmd文件完成:

---
title: "Purl MWE"
output: html_document
---

```{r}
## This chunk automatically generates a text .R version of this script when     running within knitr.
input  = knitr::current_input()  # filename of input document
output = paste(tools::file_path_sans_ext(input), 'R', sep = '.')
knitr::purl(input,output,documentation=1,quiet=T)
```

```{r}
x=1
x
```

如果你没有命名块,它工作正常,每次你运行knit()(或点击RStudio中的编织)时你得到html和.R输出.

但是,如果您将块命名为失败.例如:

---

title: "Purl MWE"
output: html_document
---

```{r}
## This chunk automatically generates a text .R version of this script when     running within knitr.
input  = knitr::current_input()  # filename of input document
output = paste(tools::file_path_sans_ext(input), 'R', sep = '.')
knitr::purl(input,output,documentation=1,quiet=T)
```


```{r test}
x=1
x
```

它失败了:

Quitting from lines 7-14 (Purl.Rmd) 
Error in parse_block(g[-1], g[1], params.src) : duplicate label 'test'
Calls: <Anonymous> ... process_file -> split_file -> lapply -> FUN -> parse_block
Execution halted

如果您注释掉该purl()呼叫,它将与命名的块一起使用.因此,有一些关于purl()调用如何命名块的原因导致knit()认为即使没有重复项也存在重复的块名称.

有没有办法purl()在.Rmd文件中包含一个命令,以便生成两个输出(html和R)？或者有更好的方法吗？我的最终目标是使用new rmarkdown::render_site()构建一个网站,每次编译网站时都会更新HTML和R输出.

Answer 1

您可以通过options(knitr.duplicate.label = 'allow')在文件中包含以下内容来允许重复标签：

title: "Purl MWE"
output: html_document
---

```{r GlobalOptions}
options(knitr.duplicate.label = 'allow')
```


```{r}
## This chunk automatically generates a text .R version of this script when     running within knitr.
input  = knitr::current_input()  # filename of input document
output = paste(tools::file_path_sans_ext(input), 'R', sep = '.')
knitr::purl(input,output,documentation=1,quiet=T)
```


```{r test}
x=1
x
```

此代码未记录在knitr网站上，但您可以直接从 Github 跟踪最新更改：https : //github.com/yihui/knitr/blob/master/NEWS.md