添加不分组的计数列[重复]

说我有一个 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完成的。