9

我有一个 R 脚本，它接受我想转换为 Rtex 或 Rnw 文件的命令行参数，以便使用如下命令进行编织：

knit('myScript.Rtex "-args arg1=a arg2=b"')

但我不知道如何将我的命令行参数放入 myScript.Rtex [用于评估args <- commandArgs()]。我试图避免编写可能包含相同信息并由 myScript.Rtex 读取的临时文件，因为这看起来不必要地不整洁。请问有人可以提供建议/解决方案吗？

那么，长话短说，如何最好地将信息放入 .Rnw 文件中的块中，该块与处理 .R 文件中的命令行参数等效（或至少相似）？

编辑：合并下面评论中的代码

我想在计算中使用它们。例如，我有一个 R 脚本运行

R CMD BATCH --slave --no-save --no-restore "--args input=blah" myScript.R

现在我想将相同的参数传递给myScript.Rnw，它是 的一个版本myScript.R，但散布着 LaTeX 和 R 代码块。所以更广泛的问题只是为了让 knitr 报告处理对我有用，我需要一种方法来更改运行报告的数据。我有一个解决方法 - 但我肯定想知道我是否可以将命令行参数传递给我的 .Rnw 文件中的一个块。现在我不能那样做。

这是我的解决方法：

#!/bin/bash
if [ $# -ne 2 ];
  then ` echo "Usage: $0 refdir cmpdir" exit 1`
fi
export CSPP_VIIRS_EDR_REFERENCE_DIR=$1
export CSPP_VIIRS_EDR_COMPARISON_DIR=$2
script=$(dirname $0)'/viirs_edr_UseR_compare.Rnw'
R --slave --no-save --no-restore -e "require(knitr); knit('$script')" &> viirs_edr_UseR_compare.log
pdflatex viirs_edr_UseR_compare.tex
exit 0

我使用Sys.getenv()*viirs_edr_UseR_compare.Rnw* 来提取我想要传递的参数，例如CSPP_VIIRS_EDR_REFERENCE_DIR。

4

2 回答 2

4

您可以编写 R 脚本而不是 bash 脚本：

my_script_launcher.R

library(knitr)
args <- commandArgs(TRUE)
if (length(args) < 2) stop("Bad args, usage refdir cmpdir")

refdir <- args[1]
cmpdir <- args[2]

knit2pdf('my_script.Rnw')

我的脚本.Rnw

\documentclass{article}
\begin{document}
refdir=\Sexpr{refdir}
cmpdir=\Sexpr{cmpdir}
\end{document}

然后你像这样启动它：

Rscript my_script_launcher.R foo bar
于 2014-04-15T12:20:58.953 回答
1

我遇到了同样的问题，最终使用了以下命令（使用make）：

# set parameters
P1=some parameter
P2=some other parameter

# top target
all : report.html

# convert Markdown to HTML
%.html : %.md
    Rscript -e 'require(markdown);markdownToHTML("$<","$@")'

# knit Rmd passing parameters
%.md : %.Rmd
    Rscript -e 'param1<-$(P1);param2<-$(P2);require(knitr);knit("$<")'

在report.Rmd我可以str(c(param1,param2))在代码块中使用并运行make将生成一个包含chr [1:2] "some parameter" "some other parameter".

如果您不使用make，只需指定您想要的方式knit以及从何处获取参数，我可以帮助您调整我的解决方案以满足您的需求。

于 2014-06-25T13:04:33.937 回答