为什么data.table代码在R控制台正常运行，封装进R包调用时报找不到对象错误

问题原因 #

这是R包命名空间查找规则与data.table非标准求值逻辑冲突导致的：

• data.table的[]子集操作默认使用非标准求值，会优先从当前data.table的列中查找变量（比如你代码里的A），这个逻辑在控制台运行时是生效的，因为data.table加载后[.data.table方法已经注册到全局环境，R会优先调用该方法。
• 当代码封装到R包时，你仅在DESCRIPTION的Imports字段声明了依赖data.table，没有显式将data.table的[]方法导入包的命名空间，R在包内调用[]时会回退到base包的[.data.frame方法，后者不会在数据框列中查找变量，只会去函数环境/全局环境查找A，自然会报错，你提供的错误日志中出现的[.data.frame调用也验证了这点。

解决方案 #

可选以下任意一种方案解决：

方案1：导入data.table的子集方法（推荐） #

在你的函数roxygen注释中增加导入语句，让R在包内优先调用data.table的[]方法：

#' @export
#' @importFrom data.table `[`
bug <- function() {
    data.table::data.table(A = c(2, 1))[order(A), ]
}

如果你其他代码也频繁用到data.table的操作，可以直接全量导入data.table：

#' @export
#' @import data.table
bug <- function() {
    # 导入后甚至可以不用写data.table::前缀
    data.table(A = c(2, 1))[order(A), ]
}

修改后重新执行devtools::document()更新NAMESPACE文件即可。

方案2：使用标准求值写法（无需修改导入逻辑） #

如果你不想修改包的导入规则，可以改成标准求值写法，显式指定从data.table的列中取A：

#' @export
bug <- function() {
    dt <- data.table::data.table(A = c(2, 1))
    dt[order(dt$A), ]
    # 或者用.SD写法：dt[order(.SD[["A"]]), ]
}

修改后重新安装包即可正常运行。

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