Question

在R data.table中，可以通过传递列名列表（value.var =）和聚合函数列表（fun.aggregate =）来对多列进行重塑。当这些列表被显式传递给函数参数时，这将很好地工作。如果将列表作为变量传递，似乎会导致错误情况。

例如，让我们如下创建数据表dt：

dt = data.table(x=sample(5,20,TRUE), y=sample(2,20,TRUE), 
                z=sample(letters[1:2], 20,TRUE), d1 = runif(20), d2=1L)

在两列d1和d1上的重整操作与传递的参数一起使用，如下所示：

dcast(dt, x + y ~ z, fun=list(sum, mean), value.var=list("d1", "d2"))

但是，当参数作为命名变量传递时，相同的操作也会失败。

funs = list(sum, mean)
vars = list("d1", "d2")
dcast(dt, x + y ~ z, fun=funs, value.var=vars)

错误消息是：

Error in aggregate_funs(fun.call, lvals, sep, ...) : 
  When 'fun.aggregate' and 'value.var' are both lists, 'value.var' must be either of length =1 or =length(fun.aggregate)

这是一个错误，还是我走错路了？

更新：在Windows的R版本3.5.0和data.table版本1.11.4中进行了尝试。在实际情况下，我的表有171列和超过300,000行。枢轴操作涉及31列。在尝试将函数参数作为变量而不是较长的“原位”列表传递时，我意外地遇到了错误。我正在寻找一种解释为什么会出现此错误情况。谢谢！

Answer 1

期望使用字符向量而不是列表：

 dcast(dt, x + y ~ z, fun=list(sum, mean), value.var=c("d1","d2"))
   x y  d1_sum_a  d1_sum_b d2_sum_a d2_sum_b d1_mean_a d1_mean_b d2_mean_a d2_mean_b
1: 1 1 0.3437415 1.7922195        1        3 0.3437415 0.5974065         1         1
2: 2 1 0.0000000 0.5831969        0        1       NaN 0.5831969       NaN         1
3: 2 2 0.6644480 0.5086218        1        2 0.6644480 0.2543109         1         1
4: 3 1 2.0642855 0.9072466        3        3 0.6880952 0.3024155         1         1
5: 3 2 0.0000000 0.7751363        0        1       NaN 0.7751363       NaN         1
6: 4 2 0.5024032 0.8132855        1        1 0.5024032 0.8132855         1         1
7: 5 2 0.1153944 0.8494716        1        2 0.1153944 0.4247358         1         1

在运行R 3.5.0和data.table 1.14.1的Mac（El Capitan）上运行

在R data.table中，当将args作为命名列表传递时，在多列上的重塑失败

1 个答案: