为什么此代码可以在 R 控制台中运行，但不能作为 R 包的一部分运行？

这段代码工作正常：

data.table::data.table(A = c(2, 1))[order(A), ]

它打印：

   A
1: 1
2: 2

我也可以将此代码封装在函数中（相同的输出）：

bug <- function() {
    data.table::data.table(A = c(2, 1))[order(A), ]
}
bug()

但是，将此函数放入包中并调用Bug::bug()由于某种原因不起作用，给我

Error in order(A) : object 'A' not found
Calls: <Anonymous> -> [ -> [.data.table -> [.data.frame -> order
Execution halted

以下是重现此问题的方法：

File DESCRIPTION:

Package: Bug
Title: Bug
Version: 0.0.0.0001
Description: Bug
License: GPLv3
Imports: data.table
Encoding: UTF-8
RoxygenNote: 7.1.1

File R/Bug.R:

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

Then cd进入目录DESCRIPTION是和问题

R -e "devtools::document(); devtools::install(); Bug::bug()"

The data.table包做了一些奇怪的非标准评估。它试图弄清楚你的包是否想要支持它，在你的情况下，决定“不”。

我认为这是有记录的行为，但我会称其为设计缺陷，如果不是错误的话。

您可以强制它支持 NSE，方法是：

.datatable.aware <- TRUE

在你的包源代码中的某个地方。