按子组计数[重复]

说我有一个 data.frame 对象:

df <- data.frame(name=c('black','black','black','red','red'),
                 type=c('chair','chair','sofa','sofa','plate'),
                 num=c(4,5,12,4,3))

现在,我想计算每个组合的行数(观察值) name 和 type .可以这样做:

table(df[ , c("name","type")])

或者也可能是 plyr ,(虽然我不知道怎么做)。

然而,如何将结果整合到原始数据框架中?结果如下所示:

df
#    name  type num count
# 1 black chair   4     2
# 2 black chair   5     2
# 3 black  sofa  12     1
# 4   red  sofa   4     1
# 5   red plate   3     1

哪里 count 现在存储聚合的结果。

解决方案 普利尔 学习起来可能也很有趣,不过我想看看base R是如何做到这一点的。