R语言如何不依赖函数实现作用域内临时变量隔离

针对不编写自定义函数、仅在代码块内使用临时变量、块结束后自动清理临时变量不污染工作环境的需求，以下是3种可直接落地的实现方式：

方案1：使用base R内置local()函数（推荐，写法最接近原生大括号） #

不需要自行编写任何自定义函数，local()是R原生提供的局部求值函数，会自动创建独立临时环境执行块内代码，执行结束后临时环境自动销毁，内部变量完全不会泄露到外部。
示例代码：

H <- 10
local({
  # 块内可以正常读取外部已有变量
  b <- H + 1
  # 需要修改外部变量时用<<-赋值即可，普通<-只会修改临时环境内的变量
  H <<- b / 2
})

# 结果验证
print(H)
#> [1] 5.5
exists("b")
#> [1] FALSE

这个方案的优势是写法和普通大括号几乎一致，哪怕块内代码运行报错，临时环境也会被R的垃圾回收机制自动清理，不会出现变量泄露。

方案2：手动创建临时环境执行代码（完全基于R环境特性，无隐式逻辑） #

R的环境本身是天然隔离的，你可以手动创建一个用完即弃的临时环境，在这个环境里执行块代码，执行结束后临时环境没有引用会被自动回收。
base R原生实现（无需加载任何第三方包）：

H <- 10
# 创建父环境为当前工作环境的临时环境，保证能读取到外部变量
eval({
  b <- H + 1
  H <<- b / 2
}, envir = new.env(parent = parent.frame()))

# 结果验证
print(H)
#> [1] 5.5
exists("b")
#> [1] FALSE

这个方案的逻辑完全透明，没有依赖任何特殊的求值封装，适合需要明确控制环境指向的复杂脚本场景。

方案3：普通大括号+手动清理临时变量（无特殊语法） #

如果你不想用任何特殊封装，就用R默认的大括号块，只需要在块的最后手动删除所有临时定义的变量即可：

H <- 10
{
  b <- H + 1
  H <- b / 2
  # 块结束前删除所有临时变量
  rm(b)
}

# 结果验证
print(H)
#> [1] 5.5
exists("b")
#> [1] FALSE

注意：这个方案稳定性最差，如果块内代码在rm()执行前抛出错误，临时变量会残留在工作环境中，仅适合逻辑非常简单的短代码块使用。

补充说明：R默认的大括号没有独立作用域，本质是在当前环境直接执行代码，所以块内定义的变量默认会留在当前环境里。以上前两种方案都是利用R环境的天然隔离特性实现自动清理，是大型脚本开发中最常用的环境整洁方案。

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