r - 数据帧中通用ID的总和值

Question

我有一个数据框，看起来像:

df<-data.frame(id=c("xx33","xx33","xx22","xx11","xx11","xx00"),amount=c(10,15,100,20,10,15),date=c("01/02/2013","01/02/2013","02/02/2013","03/03/2013","03/03/2013","04/04/2013"))

    id  amount  date
1   xx33    10  01/02/2013
2   xx33    15  01/02/2013
3   xx22    100 02/02/2013
4   xx11    20  03/03/2013
5   xx11    10  03/03/2013
6   xx00    15  04/04/2013

我想编译所有通用ID，并求和ID的数量以及出现的次数，但还要携带诸如每个ID相同的日期之类的通用信息(以及其他变量)。因此，我希望输出为:

    id  sum date        number
1   xx33    25  01/02/2013   2
2   xx22    100 02/02/2013   1
3   xx11    30  03/03/2013   2
4   xx00    15  04/04/2013   1

我试过了

ddply(.data = df, .var = "id", .fun = nrow)

并返回出现的总数，但是我想不出一种方法来求和所有通用id而不加循环。

Answer 1

这是使用plyr软件包的解决方案:

   library(plyr)
ddply(df,.(date,id),summarize,sum=sum(amount),number=length(id))
            date   id sum number
    1 01/02/2013 xx33  25      2
    2 02/02/2013 xx22 100      1
    3 03/03/2013 xx11  30      2
    4 04/04/2013 xx00  15      1