判断函数未加载R中的库

问题是，您的new_env环境的父级设置为baseenv()，而baseenv()的父级为空.您没有将任何对象放入new_env中，因此当您在该环境中计算表达式时，将只找到baseenv()中的对象.library()是基本环境中的一个函数，因此不会触发错误，但library()修改的是搜索列表，而不是基本环境，因此永远不会找到data.table().

要知道如何修复您的代码，我需要知道您想要它做什么.

• 如果您只想访问data.table函数，您可以保留new_env的定义不变，但执行data.table::data.table(iris).

• 如果您希望在搜索列表中附加data.table的副作用，并且希望在不使用前缀的情况下计算表达式，则可以将父对象设置为globalenv().然而，这将允许用户将名为data.table的函数放入全局环境中，并且它将优先于data.table包中的函数.

• 如果您想要更改搜索列表的副作用，但又想跳过全局环境，我认为这很混乱:搜索列表中的第一个条目是globalenv()的父项，但library(data.table)可能会改变这一点.所以您可以使用library(data.table, pos = 3)，但是如果您想要执行您向我们展示的代码，我认为您不能使用envir的单一规范来实现.您需要解析代码并一次计算一个表达式，每个表达式使用envir = parent.env(globalenv()).例如:

test_code <- "library(data.table); print(data.table(iris))"

new_env <- new.env(parent = parent.env(globalenv()))

exprs <- parse(text = test_code)

for (i in seq_along(exprs)) {
  eval(exprs[[i]], envir = new_env)
  parent.env(new_env) <- parent.env(globalenv())
}

您在一条 comments 中说:"代码应该是自给自足的，所以我们的 idea 是在一个全新的环境中测试代码，并确保一切都按预期工作."在这种情况下，我不会使用我的样例代码，它以一种非常奇怪的方式计算它.您应该做R CMD check所做的事情，即启动一个新的R进程，通过获取包含代码的文件来运行测试.