如何在data.table dcast中引用多个聚合函数？

Question

我想将data.table dcast函数放入一个函数中，该函数可以处理聚合函数的自定义数量/顺序。这就是我需要将聚合函数作为参数传递给dcast函数的原因。需要在dcast之外定义参数。 我怎么能这样做？

这很好用，但我想在dcast之外定义聚合函数。

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

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

我试过这个方法：

func <- list(sum, min)

dcast(dt, x + y ~ z, fun = func, value.var = "d1")

然后我收到此错误消息：

  

eval中的错误（expr，envir，enclos）：找不到函数＆＃34; func＆＃34;