r - 从函数发送列名到 ddply

Question

我希望能够将列名发送给我正在调用的电话 ddply .一个例子ddply称呼:

ddply(myData, .(MyGrouping), summarise, count=sum(myColumnName))

如果我有 ddply包装在另一个函数中是否可以包装它，以便我可以将任意值作为 myColumnName 传递到调用函数？

Answer 1

必须有更好的方法。而且我不知道如何使它与摘要一起使用。

my.fun <- function(df, count.column) { 
  ddply(df, .(x), function(d) sum(d[[count.column]]))
}

dat <- data.frame(x=letters[1:2], y=1:10)

> my.fun(dat, 'y')
  x V1
1 a 25
2 b 30
>