我已经在R中提取了rm()的函数（因为我每次想要清除环境时都要输入{{1}}而烦恼;它很快就会变脏）我试过了修改它以自动使用rm(list=ls())代码，但它没有工作。任何人都可以找到一种方法来编辑此函数以自动执行list=ls()但不删除自身的操作。
rm(list=ls())供参考：
function (..., list = character(), pos = -1, envir = as.environment(pos),
inherits = FALSE)
{
dots <- match.call(expand.dots = FALSE)$...
if (length(dots) && !all(sapply(dots, function(x) is.symbol(x) ||
is.character(x))))
stop("... must contain names or character strings")
names <- sapply(dots, as.character)
if (length(names) == 0L)
names <- character()
list <- .Primitive("c")(list, names)
.Internal(remove(list, envir, inherits))
}
也不起作用。