data.table v1.9.5 (R) 中 shift() 函数的奇怪行为

我正在使用当前的开发版本data.table(v1.9.5)，很大程度上是因为它拥有出色的内置功能shift()功能。

我注意到，当尝试将语句分组时data.table呼叫——其中之一是呼叫shift()--我从中得到了一些奇怪的行为：

library(data.table)

foo = data.table(x = c(1, 5, 6 ,2, 9, 8))

foo[, y := {
        delta = c(NA, diff(x));
        lag = shift(x, n = 1L, fill = NA);
        list(delta/lag)}]

上述尝试添加y抛出以下错误：

Error in delta/lag : non-numeric argument to binary operator

所以我通过创建来检查我得到了什么delta and lag根本不尝试与他们互动：

foo[, c('delta', 'lag') := 
      list(c(NA, diff(x)),
           shift(x, n = 1L, fill = NA))]
foo
   x delta               lag
1: 1   NA  NA, 1, 5, 6, 2, 9
2: 5    4  NA, 1, 5, 6, 2, 9
3: 6    1  NA, 1, 5, 6, 2, 9
4: 2   -4  NA, 1, 5, 6, 2, 9
5: 9    7  NA, 1, 5, 6, 2, 9
6: 8   -1  NA, 1, 5, 6, 2, 9

如果我将这些调用分开，我就可以得到我想要的：

foo[, delta := c(NA, diff(x))]
foo[, lag := shift(x, n = 1L, fill = NA)]

foo
   x delta lag
1: 1   NA   NA
2: 5    4    1
3: 6    1    5
4: 2   -4    6
5: 9    7    2
6: 8   -1    9

这是一个错误还是我在这里遗漏了一些东西？

编辑：正如帕斯卡指出的，我最初的示例中的错误是由于以下事实造成的：shift()返回一个列表。

随着最近在 v1.9.5 中提交 https://github.com/Rdatatable/data.table/commit/359ccf0ab6fa88f349c94a3cd54d0b88ff1568b1, shift()返回向量输入上的向量和length(n) == 1。也就是说，当answer is a list为方便起见，长度为 1，我们返回一个向量。这使我们能够：

DT[, col := shift(val, type = "lead")] # or "lag"

and

DT[, col := valA + shift(valB, type="lead")] # or "lag"

在这两种情况下，vector被返回并且RHS of :=当原子时，被包裹着list()内部为了方便，这给出了预期的行为。

这就关闭了#1127 https://github.com/Rdatatable/data.table/issues/1127.