R - 循环中的 knitr 模板和子文档



圣诞节前,我之前问过多个 knitr 文档中的单个样式表。 我现在知道我缺少的关键搜索词是"子文档"。

我创建了一个最小的降价示例,但我在创建的文档中获得了标题,这些标题是编织过程的一部分。 我正在使用RStudio来处理它。 我见过很多类似的问题,但没有一个答案有效。 我已经尝试了块参数的各种组合,但到目前为止无济于事。

问题:如何去除最终针织文档中的标题?

# Master document
```{r master1, comment='', echo=FALSE, message=FALSE, warning=FALSE, results="asis", fig.width= 4., fig.height= 4, fig.cap= ""}
out = NULL
for (i in 1:3) {
  # lets create three different uniform data sets.
  v1 <- sort(rnorm(2))
  uvec <- runif(10, v1[[1]], v1[[2]])
  # now we want to 
  out <- c(out, knit_child('child.Rmd'))
}
cat(paste(out, collapse = 'n'))
```

子文档包含:

## child document `r i`
Here is a summary of the dataset:
```{r echo=FALSE}
summary(uvec)
```

不幸的是,我也得到了一个烦人的标题....

|
| | 0% |
|…………………. | 33% inline R code fragments
|
|……………………………………. | 67% label: unnamed-chunk-1
|
|………………………………………………………..| 100% ordinary text without R code
|
| | 0% |
|…………………. | 33% inline R code fragments
|
|……………………………………. | 67% label: unnamed-chunk-2
|
|………………………………………………………..| 100% ordinary text without R code
|
| | 0% |
|…………………. | 33% inline R code fragments
|
|……………………………………. | 67% label: unnamed-chunk-3
|
|………………………………………………………..| 100% ordinary text without R code

肖恩给出的答案对我不起作用。对我有用的代码是:

# Master document
```{r echo=FALSE, include=FALSE}
library(knitr)
out = NULL
for (i in 1:3) {
  # lets create three different uniform data sets.
  v1 <- sort(rnorm(2))
  uvec <- runif(10, v1[[1]], v1[[2]])
  out <- c(out, knit_child('child.Rmd'))
}
```
```{r, echo=FALSE, results="asis"}
cat(paste(out, collapse = 'n'))
```

一个答案是使用 knit_expand() 而不是 knit_child(),稍后再knit(, quiet=TRUE) - 这是一个修订的主文档。

# Master document
```{r master1, comment='', echo=FALSE, message=FALSE, warning=FALSE, results="asis", fig.width= 4., fig.height= 4, fig.cap= ""}
out = NULL
for (i in 1:3) {
  # lets create three different uniform data sets.
  v1 <- sort(rnorm(2))
  uvec <- runif(10, v1[[1]], v1[[2]])
  out <- c(out, knit_expand('child.Rmd'))
}
cat(knit(text=unlist(paste(out, collapse = 'n')), quiet=TRUE))
```

我在使用Latex而不是markdown时遇到了同样的问题,对我来说的解决方案是使用Sexpr而不是代码块

此外,knit_child('child.file', quiet=TRUE)也可以

相关内容

最新更新