Вызовите Rmarkdown из командной строки с аргументами

Я пытаюсь запустить Rmarkdown скрипт из командной строки, передающий несколько аргументов, которые будут интегрированы в информацию заголовка, а затем выводит некоторые из них.

Вот мой Rmd код скрипта:

args <- commandArgs(TRUE)
parseArgs <- function(x) strsplit(sub("^--", "", x), "=")
argsDF <- as.data.frame(do.call("rbind", parseArgs(args)))
argsL <- as.list(as.character(argsDF$V2))
names(argsL) <- argsDF$V1

---
title: "`r argsL$title`"
author: "`r argsL$author`"
date: "`r format(Sys.time(), '%d %B, %Y, %H:%M')`"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

```{r cars}
print(argsL$title)
print(argsL$author)
```

И мой вызов командной строки:

R -e "rmarkdown::render('test.Rmd',output_file='test.html')" --args --title=my.title --author=me

И я получаю эту ошибку:

processing file: test.Rmd
  |................                                                 |  25%
   inline R code fragments

Quitting from lines 2-12 (test.Rmd)
Error in eval(expr, envir, enclos) : object 'argsL' not found
Calls: <Anonymous> ... in_dir -> inline_exec -> withVisible -> eval -> eval

Execution halted

есть идеи как это сделать?

0 ответов

Другие вопросы по тегам