为什么data.table不知道“ J”?

时间:2019-10-18 10:16:35

标签: r debugging data.table rstudio

我在调试模式下运行RStudio,以检查软件包中的某些功能(该软件包使用data.table,并且已运行2年)。现在我在某些功能上遇到以下情况:

routes[J(x1, y1, x2, y2), nomatch = 0L]
  

J(x1,y1,x2,y2)中的错误:找不到函数“ J”

如前所述:该软件包有效,并且已设置 library(data.table)

现在我想,我按照建议here进行了小检查-环境没有改变

dt = data.table( id = 1L, start = c( 9, 21, 5 ), end = c( 10, 22, 7 ) )
data.table::setkey(dt, "start")
dt[J(1), nomatch = 0L]
  

空的data.table(0行),共3个列:id,start,end

我得到正确的结果吗? 我每个人都有一个主意,如何创建可复制的示例,我会尝试。这对我来说没有任何意义...所以我再次尝试,但是

routes[J(x1, y1, x2, y2), nomatch = 0L]
  

J(x1,y1,x2,y2)中的错误:找不到函数“ J”

任何暗示都值得赞赏

屏幕截图

enter image description here

可复制的示例,在data.table中具有多个参数:

library(data.table)
r <- data.table::data.table(lat1 = numeric(0), lng1 = numeric(0),
                            lat2 = numeric(0), lng2 = numeric(0), 
                            time = numeric(0))
data.table::setkey(r, lat1, lng1, lat2, lng2)

lat1 = 1
lat2 = 2
lng1 = 11
lng2 = 22
li <- data.table::data.table(lat1=lat1, lng1=lng1, lat2=lat2, lng2=lng2, time=time)
r <- rbindlist(list(r, li))
data.table::setkey(r, lat1, lng1, lat2, lng2)

r[J(1, 11, 2, 22), nomatch = 0L]
# lat1 lng1 lat2 lng2       time
# 1:    1   11    2   22 <function>
r[J(1, 11, 2, 0), nomatch = 0L]
# Empty data.table (0 rows) of 5 cols: lat1,lng1,lat2,lng2,time

But still:
routes[J(1, 11, 2, 22), nomatch = 0L]
# Error in J(1, 11, 2, 22) : could not find function "J"

1 个答案:

答案 0 :(得分:8)

J不是函数。它是在评估前被替换的别名:

https://github.com/Rdatatable/data.table/blob/master/R/data.table.R#L102

我怀疑routes不是data.table。

在这里添加我的评论,因为它们说明了我的思考过程,可以解决该问题:

我回答了一个非常相似的问题,有人正在寻找.函数。因此,我对此很确定,只需要在源代码中搜索J。一旦我确认它是.之类的别名,就很容易推断出代码无法调用[.data.table

您致电了[,它有2个以上的参数。因此,那里没有错误。仅当评估第一个参数时,您才能得到错误。