我正在try 使用这些数据.我自己的包裹里有一个桌子Package.MWE如下:
我创建了一个函数，test.有趣的是，这只是创建了一个小数据.表对象，然后按"A"列对"Val"列分组求和.代码是
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
有人能解释一下为什么会发生这种情况，以及我能做些什么来解决它吗.非常感谢您的帮助.