有条件地在Bookdown中包括章节

问题描述 投票:4回答:1

假设我有一个名为index.Rmd的主R-Markdown文件和另一个名为child.Rmd的R-Markdown文件。如果要基于条件params$value1 > params$value2包含R-Markdown文件child.Rmd,可以将以下代码添加到文件索引中。[Rmd

condition <- params$value1 > params$value2
filepathToChild <- "/home/user/child.Rmd"
```{r conditional_print, 
child=filepathToChild , eval = condition
}
```

使用bookdown,我可以创建一个名为_bookdown.yml的文件,其内容如下,在文件index.Rmd的内容之后包括child.Rmd文件的内容。

rmd_files: ["index.Rmd", "child.Rmd"]

我如何根据条件params$value1 > params$value2在书本中包括child.Rmd文件的内容?

r r-markdown bookdown
1个回答
0
投票

我想不出在yml中执行此操作的解决方案,但是您可以以编程方式创建该yml文件,并将其与渲染过程结合。

只需创建一个简单的脚本即可生成.yml文件并进行渲染:

# compile_my_book.R

# get the parameters
param1 <- commandArgs(trailingOnly = TRUE)[1]
param2 <- commandArgs(trailingOnly = TRUE)[2]

# just some dummy yml from bookdown examples
my_yml <- paste0(
"book_filename: 'my-book.Rmd'
before_chapter_script: ['script1.R', 'script2.R']
output_dir: 'book-output'
clean: ['my-book.bbl', 'R-packages.bib']"
)

# list the files
# (here you could also use list.files to get them automatically, sorting them etc.)
my_files <- c("chapter01.Rmd", "chapter02.Rmd", "References.Rmd")

# add your conditional files
if (param1 > param2) my_files <- c(my_files, "conditional.Rmd")

# create the _bookdown.yml
cat(my_yml,
    "\nrmd_files: ['", paste0(my_files, collapse = "', '"), "']",
    file = "_bookdown.yml", sep = "")

# render your book with the arguments you want (excluding the values you want to check for)
bookdown::render_book('index.Rmd', 'bookdown::gitbook')

然后您可以从命令行编译该书:

Rscript compile_my_book.R value1 value2

((或创建一个makefile或类似的东西来为您运行多件事)

因此,运行Rscript compile_my_book.R 1 2不会添加条件文件,但是Rscript compile_my_book.R 2 1会添加条件文件。>

这有点棘手,但是我正在使用类似的工作流程,通过从多个来源读取数据,检查某些条件并创建配置文件,为我使用的某些Web应用程序创建长的.xml-config文件。

© www.soinside.com 2019 - 2024. All rights reserved.