在我自己的包中使用Data.Table包

Question

我试图在我自己的包中使用data.table包。MWE如下：

test.fun<-function ()
{
    library(data.table)
    testdata<-data.table(A=rep(seq(1,5), 5), Val=rnorm(25))
    setkey(testdata, A)
    res<-testdata[,{list(Ct=length(Val),Total=sum(Val),Avg=mean(Val))},"A"]
    return(res)
}

> res<-test.fun()
data.table 1.8.0  For help type: help("data.table")
> res
     A Ct      Total        Avg
[1,] 1  5 -0.5326444 -0.1065289
[2,] 2  5 -4.0832062 -0.8166412
[3,] 3  5  0.9458251  0.1891650
[4,] 4  5  2.0474791  0.4094958
[5,] 5  5  2.3609443  0.4721889

> library(testpackage)
> res<-test.fun()
data.table 1.8.0  For help type: help("data.table")
Error in `[.data.frame`(x, i, j) : object 'Val' not found

Answer 1

安德烈的猜测是对的，+1。它有一个FAQ（请参见小插曲（“datatable-faq”）)，以及一个关于导入data.table的新小插曲：

常见问题6.9：我创建了一个依赖于data.table的包。我如何确保我的包是Data.Table感知的，以便从Data.Frame继承工作？

i）在描述文件的depends:字段中包含data.table，或者在描述文件的imports:字段中包含data.table，在命名空间文件中包含import(data.table)。

这也是为什么data.table继承过去不能与无名称空间的包兼容，以及为什么在用户请求时，我们必须要求此类包的作者为其包添加一个名称空间以使其兼容。令人高兴的是，现在R为缺少一个名称空间的包添加了一个默认名称空间（从V2.14.0开始），这个问题已经消失了：

R Version2.14.0
*所有包都必须有一个命名空间，如果源代码中没有提供，则在安装时创建一个命名空间。