r - 如何保存名称在变量中的对象？

Question

这需要一些“棘手的 R”，但这一次超出了我的想象 :-) 我需要 save() 一个名称在变量 var 。我试过了:

save(get(var), file = ofn)
# Error in save(get(var), file = ofn) : object ‘get(var)’ not found

save(eval(parse(text = var)), file = ofn)
# Error in save(eval(parse(text = var)), file = ofn) : 
#  object ‘eval(parse(text = var))’ not found

不幸的是，两者都失败了。你会如何解决这个问题？

Answer 1

使用 list 参数。这会将 x 保存在文件 x.RData 中。 (如果您需要一次保存多个名称，list 参数可以指定名称向量。)

x <- 3
name.of.x <- "x"
save(list = name.of.x, file = "x.RData")

# loading x.RData to check that it worked
rm(x)
load("x.RData")
x
## [1] 3

注意

关于尝试使用 get 的问题中的第一次尝试，我们需要指定名称而不是其值，以便尝试可以使用 do.call 转换字符name 类对象的名称。

do.call("save", list(as.name(name.of.x), file = "x.RData"))

关于使用 eval 的问题中的第二次尝试，写出 save，将其名称替换为 name类对象，然后对其进行评估。

eval(substitute(save(Name, file = "x.RData"), list(Name = as.name(name.of.x))))