5

data.table関数が動作しているがkey編集されているかどうかを確認したいのですが。どのようにこれを行うのですか？例えば：

x = data.table(a=1:100, b=100:1)
setkey(x, a)
f = function(v) {v+1}
x[,f(b),by=a]

キーがセットされているかどうか、そしてそれが何であるかを内部 で確認したいと思いますfxkey

fこの場合、から呼び出されたオブジェクトにアクセスする必要がありますx。これはで可能data.tableですか？

4

1 に答える 1

4 
f = function(v) {
    cat("haskey(caller's x) is",eval(quote(haskey(x)), sys.frame(2)),"\n")
    # x in line above = name of first argument to `[.data.table`
    v+1
}
DT = data.table(a=1:3,foo=1:6)
DT[,f(foo),by=a]
haskey(caller's x) is FALSE 
haskey(caller's x) is FALSE 
haskey(caller's x) is FALSE 
   a V1
1: 1  2
2: 1  5
3: 2  3
4: 2  6
5: 3  4
6: 3  7

setkey(DT,a)
DT[,f(foo),by=a]
haskey(caller's x) is TRUE 
haskey(caller's x) is TRUE 
haskey(caller's x) is TRUE 
   a V1
1: 1  2
2: 1  5
3: 2  3
4: 2  6
5: 3  4
6: 3  7
>

しかし、なぜそれが必要なのですか？

于 2013-01-17T15:41:06.673 に答える