Question

我想在运行调用自定义包中的一堆函数的R脚本之前设置一些选项（全局）。这些选项将从看起来像

的文本文件（config）中读取

param1=value1

我这样读了这个文件

configs_df<-read.csv("configfile", sep="=", strip.white=TRUE, header=FALSE, comment.char="#", stringsAsFactor=FALSE, blank.lines.skip=TRUE)

我尝试过使用eval和sprintf的组合，但无济于事

options("eval(configs_df$V1[1])"="eval(configs_df$V2[1])")
do.call(options, list(configs_df$V1[1], configs_df$V2[1]))
params <- c(configs_df$V1[1], configs_df$V2[1])
exp <- "options(%s=%s)"
toeval <- splat(sprintf)(c(exp, params))
eval(toeval)

我真的很感激一些指示。

Answer 1

在您读入数据后，请尝试：

options(as.list(setNames(configs_df$V2, nm=configs_df$V1)))

通过读取配置文件来设置R中的选项 - 动态评估选项（）

1 个答案: