如何在R函数内部移除隐藏变量？为何直接移除可行但函数内报错？

这个问题其实和R的作用域规则以及remove()函数的默认行为有关，我来给你拆解清楚：

1. 直接调用remove()能成功的原因 #

当你在控制台直接执行remove(.a)时，代码是运行在全局环境（.GlobalEnv）中的。remove()函数的默认参数envir指向的是当前执行环境，也就是全局环境，所以它能直接找到并删除全局环境里的.a变量。

你之前的测试代码也验证了这一点：

> .a = "a"
> .a
[1] "a"
> remove(.a)
> .a
Error: object '.a' not found

2. 封装到函数后失败的核心原因 #

当你把remove(.a)封装到Clear()函数内部时，函数的代码会在函数专属的局部环境中运行，而不是全局环境。remove()依然默认在当前环境（也就是这个局部环境）里查找.a，但.a根本不存在于这个局部环境中——它只在全局环境里，所以自然会抛出“找不到对象”的警告，也无法删除全局环境里的.a。

对应你测试的代码：

> .a = "a"
> Clear <- function(){remove(.a)}
> Clear()
Warning message: In remove(.a) : object '.a' not found
> .a
[1] "a"

3. 解决方法：明确指定操作的环境 #

要让函数里的remove()能找到全局环境的.a，只需要手动指定envir参数为全局环境即可：

方法一：直接指定全局环境 #

Clear <- function(){
  remove(.a, envir = .GlobalEnv)
}

（注：remove()是rm()的别名，你也可以用rm(.a, envir = .GlobalEnv)，效果完全一样）

方法二：用pos参数指定环境位置 #

全局环境在R的环境搜索路径中位置通常是1，所以也可以这样写：

Clear <- function(){
  remove(.a, pos = 1)
}

修改后再运行Clear()，就能成功删除全局环境里的.a变量了。

内容的提问来源于stack exchange，提问作者Andrew Haynes