r - 在 R 中聚合有条件

Question

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





Select row with most recent date by group

(5 个回答)


去年关闭。




我有一个数据框:

df <- data.frame(Xdate = c("21-jul-2020", "29-jul-2020", "20-jul-2020", "13-may-2020" ),
                 names = c("peter", "lisa","peter", "lisa"),
                 score = c(1,3,5,7))

获取最新分数的最优雅方式是什么:

df_result <- data.frame(names = c("peter", "lisa"),
                        score = c(1, 3))

peter 的最新分数是 1，并取得了 21-jul-2020并且 lisa 的最新分数是 3 并且达到了 29-jul-2020 .

Answer 1

您可以使用 slice_max()在 dplyr ，取代 top_n()后版本1.0.0 , 选择最近的日期。

library(dplyr)

df %>%
  mutate(Xdate = as.Date(Xdate, "%d-%b-%Y")) %>%
  group_by(names) %>%
  slice_max(Xdate, n = 1) %>%
  ungroup()

# # A tibble: 2 x 3
#   Xdate      names score
#   <date>     <chr> <dbl>
# 1 2020-07-29 lisa      3
# 2 2020-07-21 peter     1