Использование пакета data.table внутри моего собственного пакета

Я пытаюсь использовать пакет data.table внутри своего собственный пакет. MWE выглядит следующим образом:

Я создаю функцию test.fun, которая просто создает небольшой объект data.table, а затем суммирует столбцы «Val», сгруппированные по столбцу «A». Код

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)
}

Когда я создаю эту функцию в обычном сеансе R, а затем запускаю функцию, она работает, как и ожидалось.

> 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

Кто-нибудь может объяснить мне, почему это происходит и что я могу сделать, чтобы это исправить. Любая помощь очень ценится.

73
задан Matt Dowle 10 May 2012 в 08:09
поделиться