R如何通过十六进制地址访问未知绑定变量名的环境内对象

适配公式场景的最优方案 #

你无需通过打印的内存地址查找环境，R的公式对象本身就绑定了关联的运行环境，直接提取即可：

# 替换为你实际的公式对象
target_env <- environment(your_formula_object)
# 获取环境内的所有对象列表
ls(target_env)
# 也可以直接读取对应变量
target_env$your_object_name

这是最高效且稳定的方案，完全不依赖打印输出的内存地址。

仅知道内存地址时的通用解决方案 #

如果确实只有打印输出的十六进制地址，没有原公式对象，可以用以下两种方法定位环境：

方法1：Base R 实现（无需额外安装包） #

# 替换为你拿到的十六进制地址，注意用字符串格式
target_addr <- "0x7f947c27b5e0"

# 定义环境查找函数
find_env_by_addr <- function(addr) {
  .traverse <- function(env) {
    # 匹配当前环境地址
    if (identical(capture.output(print(env)), sprintf("<environment: %s>", addr))) {
      return(env)
    }
    # 遍历父环境
    parent <- parent.env(env)
    if (!identical(parent, emptyenv())) {
      res <- .traverse(parent)
      if (!is.null(res)) return(res)
    }
    # 遍历当前环境下的所有环境类型对象
    for (nm in ls(all.names = TRUE, envir = env)) {
      obj <- get(nm, envir = env)
      if (is.environment(obj)) {
        res <- .traverse(obj)
        if (!is.null(res)) return(res)
      }
    }
    return(NULL)
  }
  .traverse(.GlobalEnv)
}

# 获取目标环境
target_env <- find_env_by_addr(target_addr)
# 执行ls获取对象列表
ls(target_env)

方法2：用rlang包简化操作 #

# 未安装则先执行 install.packages("rlang")
library(rlang)

target_addr <- "0x7f947c27b5e0"
target_env <- env_find(addr = target_addr)
ls(target_env)

报错原因说明 #

你直接执行ls(0x7f947c27b5e0)报错的原因是：R会将输入的十六进制值自动解析为数值类型，而ls()仅接受环境对象、搜索路径整数位或包名字符串作为参数，该数值超出R的整数范围会被转为NA，自然无法识别为有效环境位置。

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