要删除NA 行,只需设置nomatch=0:
这是一个例子(我去掉了随机抽样,所以每个人都可以得到相同的结果)
library(data.table)
dt = data.table(foo = 1:10, bar = letters[1:10])
setkey(dt, bar)
needed_letters = letters[c(1:8,11,12)] #1 - 8 are available, 11 and 12 are not
dt[J(needed_letters),nomatch=0]
来自马特的补充
另外,如果您希望 nomatch=0 成为默认值,您可以更改默认值:
options(datatable.nomatch=0)
dt[J(needed_letters)] # now, no NAs will be returned
您可以像这样检查所有参数:
> args(data.table:::`[.data.table`)
function (x, i, j, by, keyby,
with = TRUE,
nomatch = getOption("datatable.nomatch"),
mult = "all",
roll = FALSE,
rollends = if (roll=="nearest") c(TRUE,TRUE)
else if (roll>=0) c(FALSE, TRUE)
else c(TRUE,FALSE),
which = FALSE,
.SDcols,
verbose = getOption("datatable.verbose"),
allow.cartesian = getOption("datatable.allow.cartesian"),
drop = NULL)
默认通过getOption 的参数因此可以更改其默认值。