R:在数据框的子集中查找列的最大值

Question

我有一个数据框df，包含列ID、Year、Value1、Value2、Value3 和 21788928 行。我需要按 Year 和 ID 对数据进行子集化，并在该子集中找到最大的 Value1 保存该行的其余信息，我需要对 Year 和 ID 的所有组合执行此操作(年份从 1982 年到 2013 年， ID 从 1 到 28371)

我试图在双 for 循环中做到这一点:

year<-seq(1982, 2013)
cnt=1
for (i in 1:32) {
  for (j in 1:28371)

    A<-df[df$Year==year[i]&df$ID==j,] 
    maxVal[cnt,]<-A[A$Value1==max(A$Value1),]
    cnt=cnt+1
}
}

但这需要很长时间。有没有更有效的方法来做到这一点？也许使用 ddply 或 with。

Answer 1

带有 aggregate 的基础 R 解决方案:

prov <- aggregate(. ~ Year + ID, data = dat, FUN = max)