r - 如何根据另一列中较大的值过滤行？

Question

我有一个像下面这样的数据框

d1<-c('a','b','c','d','e','f','g','h','i','j','k','l')

d2<-c(1,5,1,2,13,2,32,2,1,2,4,5)

df1<-data.frame(d1,d2)

这看起来像这张图片中的数据表

我的目标是根据每 3 行中 d2 的最大值过滤行。所以它看起来像这样: 谢谢!

Answer 1

我们可以使用 zoo 中的 rollmax 来过滤行

library(dplyr)
library(zoo)
df1 %>% 
  filter(d2 == na.locf0(rollmax(d2, k = 3, fill = NA)))
  d1 d2
1  b  5
2  e 13
3  g 32
4  l  5