汇总多个变量的唯一级别

时间:2017-01-24 14:58:17

标签: r dplyr aggregate transpose

数据集看起来像这样:

 ID  | DELAY |    PERIOD  | TYPE  

 A       5       30 days      1          
 A       1       60 days      1             
 A       2       30 days      2         
 A       1       30 days      2         
 B       2       30 days      2         
 C       10      30 days      2         

输出应如下所示:

 ID  | AV.DELAY_PERIOD_30DAYS_TYPE_1  |  AV.DELAY_PERIOD_30DAYS_TYPE_2  ...
  A                5                               1.5

因此,基本上,我需要构建一个构建新变量的函数 - 平均延迟,每个ID唯一,按每个唯一的周期和类型进行划分。

任何?

2 个答案:

答案 0 :(得分:2)

您可以使用R。

中的聚合函数
df1<-aggregate(df,by=list(df$id,df$period,df$type),FUN=mean)

答案 1 :(得分:1)

我们可以使用dcast中的data.table进行摘要以及重新整形

library(data.table)
dcast(setDT(df1), ID~paste0("AV.DELAY_PERIOD_",PERIOD) + TYPE, value.var = "DELAY", mean)
#   ID AV.DELAY_PERIOD_30 days_1 AV.DELAY_PERIOD_30 days_2
#1:  A                         5                       1.5
#2:  B                       NaN                       2.0
#3:  C                       NaN                      10.0
#    AV.DELAY_PERIOD_60 days_1
#1:                         1
#2:                       NaN
#3:                       NaN