Вы можете использовать комбинацию *apply()
, ls()
и assign()
. В новой сессии R я создал следующую функцию:
f <- function() {
x <- 1
y <- 2
z <- 3
return(x + y + z)
}
ls()
# [1] "f"
Затем я запустил f()
, используя debug()
, и непосредственно перед оператором return()
выполнил из консоли следующее:
lapply(ls(), function(o) assign(x = o, value = get(o), envir = .GlobalEnv))
Затем, после завершения выполнения функции, проверил мою глобальную среду:
ls()
# [1] "f" "x" "y" "z"