首页 > 解决方案 > 汇总具有相同标识符的行,其中最早开始和最晚结束以及data.table R中的最大值

问题描述

下列的data.table

dt <- data.table(
  ID= c(1,2,2,2,2),
  Value1 = c('a','b','a','a','a'),
  Start = c('2001-01-01','2000-01-01','2000-02-02','2000-03-03','2000-03-03'),
  End = c('2002-01-01','2001-01-01','2001-02-02','2001-03-03','2001-03-03'),
  Value_max = c(2,50,20,40,80)
)
   ID Value1      Start        End Value_max
1:  1      a 2001-01-01 2002-01-01         2
2:  2      b 2000-01-01 2001-01-01        50
3:  2      a 2000-02-02 2001-02-02        20
4:  2      a 2000-03-03 2001-03-03        40
5:  2      a 2000-03-03 2001-03-03        80

我想将具有相同的行组合IDValue1提取最早Start、最新End和最高Value_max。我用过dt[,SD.[which.max(Value_max)],by=.c(ID,Value1)]但不知道如何将它与最早的开始和结束日期结合起来。

标签: rdata.tablesubset

解决方案


minmax似乎就足够了:

dt[,.(earliest = min(Start),latest = max(End), value_max = max(Value_max)),by=.(ID,Value1)]
   ID Value1   earliest     latest value_max
1:  1      a 2001-01-01 2002-01-01         2
2:  2      b 2000-01-01 2001-01-01        50
3:  2      a 2000-02-02 2001-03-03        80

推荐阅读