r - 聚合而不减少数据帧的维度

Question

这个问题在这里已经有了答案:





Grouping functions (tapply, by, aggregate) and the *apply family

(10 个回答)



Calculate group mean (or other summary stats) and assign to original data

(4 个回答)


5年前关闭。




我试图在 R 中使用聚合函数，我希望输出数据帧的维度保持不变。例如:假设我有以下数据框

Name------Type------    Price   
Prod1-----A--------       $1
Prod2----A---------       $5
Prod3----B----------       $7
Prod4-----B---------       $9

在 R 中通过聚合类型和函数作为价格总和使用聚合函数后。我得到以下结果:

Type-------Value
A-----------6
B-----------16 

但是，我希望数据框的维度保持不变。例如:

Name-----Type----Price----Value  
Prod1----A-------$1-------$6
Prod2----A-------$5--------$6
Prod3----B--------$7-------$16
Prod 4----B-------$9--------$16

我不想在这个应用程序中使用 Loop。请建议任何其他方式来做到这一点。

Answer 1

我们可以使用 ave来自 base R

df1$Value <- with(df1, paste0("$", ave(as.numeric(sub("[$]", "", Price)), 
                          Type, FUN = sum)))
df1$Value
#[1] "$6"  "$6"  "$16" "$16"