r - 为什么我不能使用 R 中的应用函数将 .rda 文件加载到 R 工作区中？

Question

我有一个 .rda (RData) 文件列表。我想快速将这些数据加载到 R 中，而不必多次调用 load 函数。我想到了将 load() 函数与 sapply 结合使用。但是，使用以下代码不会在工作区中加载任何 R 对象:

# List files    
gewataPath <- list.files(path = file.path(datdir), pattern = glob2rx('Gewata*.rda'), full.names = T)
# Load files
sapply(gewataPath, function(file) {load(file)})

它也没有给出任何错误。

运行循环会将 .rda 文件作为 RasterLayer 对象加载到 R 工作区中:

for (i in 1:length(gewataPath)) {
  load(gewataPath[i])
}

我的问题是:为什么我不能使用 apply() 函数将 .rda 文件快速加载到 R 工作区中，我是否必须使用循环？

关于数据:数据包含位于埃塞俄比亚 Gewata 的 RasterLayers(来自 Landsat 卫星)。

Answer 1

load() 会将数据加载到调用它的环境中。当您创建要传递给 sapply 的函数时，该函数会获得它自己的环境。如果您希望对象在 sapply 之后存在，您希望将对象加载到全局环境中，而不是函数环境中。您可以使用 envir= 参数

sapply(gewataPath, function(file) {load(file, envir=globalenv())})

或者只是

sapply(gewataPath, load, envir=globalenv())