如何在函数环境中将 R 列表的元素作为独立对象返回？

Question

类似于这个问题：

Return elements of list as independent objects in global environment

当在函数内部调用 list2env 时，我似乎无法调整答案来分配列表元素：

例如

lst <- list(a = c(1, 2), b = c(3, 4))

tmp_fn <- function(lst) {
    # do computations on list elements
    # first assign each to the function environment
    list2env(lst, parent = parent.frame()) # fails

    # do stuff
    ...
}

我认为parent = parent.frame() 可以工作，但在调试tmp_fn 时，我只看到lst 作为列表分配给函数环境，而不是单个变量a 和b。

Answer 1

1) 在这里使用envir=，而不是像这样使用parent=。此外，如图所示，您可能希望添加 envir 作为灵活性参数：

lst <- list(a = c(1, 2), b = c(3, 4))

tmp_fn <- function(lst, envir = parent.frame()) {
    invisible(list2env(lst, envir = envir))
}
tmp_fn(lst)

2) 另一种可能性是使用 gsubfn 包中的list[...]<-（开发版）：

devtools::install_github("ggrothendieck/gsubfn")
library(gsubfn)

func <- function(lst) lst
list[a, b] <- func(lst)

现在a 和b 将在当前环境中。