在 R 中使用加载的对象名称

Question

我正在尝试将文件夹中的每个数据集加载到 R 中，通过函数运行它，将输出存储在列表中，然后在继续下一个之前将其删除。

datNames <- list.files(path = "/Some/Path/", pattern = "dl2*")
storeList <- vector(mode = "list", length = length(datNames)
for (i in 1:length(datNames) {
  load(file = paste0("/Some/Path/", datNames[i]))
  storeList[[i]] <- foo(<Name of data here>)
  rm(<Name of data here>) }

所以基本上我想做类似上面的事情，但我不知道在“这里的数据名称”中输入什么。感谢您的任何建议。

Answer 1

我建议在单独的环境中加载。然后删除该环境中的每个对象。例如，请参见下面的代码，尽管它可以针对一个文件进行概括。如果对于具有多个对象的 .R 文件需要，它还可以轻松修复以循环遍历环境中的所有对象并将它们存储在列表列表中。

x <- rnorm(100)
save(x, file = "env_example.R")
datEnv <- new.env()
datNames <- list.files(pattern = "env_example.R")
storeList <- vector(mode = "list", length = length(datNames))
for (i in 1:length(datNames)) {
  load(file = datNames[i], envir = datEnv)
  storeList[[i]] <- datEnv[[ls(datEnv)[1]]]
  rm(list = ls(envir=datEnv), envir = datEnv) 

}