Напишите функцию для удаления всего в глобальной среде

Question

Я хочу написать функцию для удаления всего из глобальной среды.Но rm(list = ls(all = TRUE)) не работает внутри функции.

z = 1:10

clean.mem <- function() {
  rm(list = ls(all = TRUE))
  }
clean.mem()

Я также пытаюсь:

clean.mem <- function() {
  rm(list = ls(all = TRUE), envir = globalenv(), pos = globalenv())
  }

, но все равно не получается.Что мне делать?

Answer 1

Нужно envir = globalenv() внутри ls тоже.

clean.mem <- function() {
  rm(list = ls(all = TRUE, envir = globalenv()), envir = globalenv())
  }

x <- 1:4
.x <- 2:5
clean.mem()
ls()
#character(0)