R 中有处理命令行选项的包吗?

发布于 2024-07-26 10:40:10 字数 602 浏览 4 评论 0原文

R 中有处理命令行选项的包吗?

我知道 commandArgs,但它太基础了。 它的结果基本上相当于 C 中的 argcargv,但我需要在此之上的一些东西,就像 C++ 中的 boost::program_optionsperl 中的 GetOptions::Long

特别是,我想提前指定允许哪些选项,并在用户指定其他内容时给出错误消息。

调用将如下所示(使用用户选项 --width=32 --file=foo.txt):

R --vanilla --args --width=32 --file=foo.txt < myscript.R

或者,如果使用 Rscript:(

myscript.R --width=32 --file=foo.txt 

请不要说,“为什么不你自己写,没那么难”。在其他语言中,你也不必自己写。:)

Is there a package to process command-line options in R?

I know commandArgs, but it's too basic. Its result is basically the equivalent to argc and argv in C, but I'd need something on top of that, just like boost::program_options in C++, or GetOptions::Long in perl.

In particular, I'd like to specify in advance what options are allowed and give an error message if the user specifies something else.

The call would be like this (with user options --width=32 --file=foo.txt):

R --vanilla --args --width=32 --file=foo.txt < myscript.R

or, if Rscript is used:

myscript.R --width=32 --file=foo.txt 

(Please don't say, "why don't you write it yourself, it's not that hard". In other languages you don't have to write it yourself either. :)

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(2

戏舞 2024-08-02 10:40:10

对于内置解决方案,commandArgs eval 怎么样?

test.R

## 'trailingOnly=TRUE' means only parse args after '--args'
args=(commandArgs(trailingOnly=TRUE))

## Supply default arguments
if(length(args)==0){
    print("No arguments supplied.")
    ##supply default values
    a = 1
    b = c(1,1,1)
}else{
    for(i in 1:length(args)){
         eval(parse(text=args[[i]]))
    }
}
print(a*2)
print(b*3)

并调用它

R CMD BATCH --no-save --no-restore '--args a=1 b=c(2,5,6)' test.R test.out

当然,使用 eval 时的常见注意事项也适用。

无耻地从这篇博客文章中窃取

How about commandArgs with eval for a built in solution?

test.R

## 'trailingOnly=TRUE' means only parse args after '--args'
args=(commandArgs(trailingOnly=TRUE))

## Supply default arguments
if(length(args)==0){
    print("No arguments supplied.")
    ##supply default values
    a = 1
    b = c(1,1,1)
}else{
    for(i in 1:length(args)){
         eval(parse(text=args[[i]]))
    }
}
print(a*2)
print(b*3)

and to invoke it

R CMD BATCH --no-save --no-restore '--args a=1 b=c(2,5,6)' test.R test.out

The usual caveats w.r.t using eval apply of course.

Shamelessly stolen from this blog post.

~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文