查找每组中的最低日期

Question

你好：我正在尝试找到每组中最低的日期。目的是找出几个时间序列中每个时间序列的共同日期。目前的数据是这样的。

library(tidyr)
library(dplyr)
grouping_variable<-sample(c('a', 'b', 'c'), 500, replace=TRUE)
date<-sample(seq(as.Date('1999/01/01'), as.Date('2015/01/01'), by="day"), 500)
numeric_variable<-rnorm(500, 50, sd=2)
df<-data.frame(grouping_variable, date, numeric_variable)

而我的工作尝试基本上就是这样。

df %>%
group_by(grouping_variable)%>%
min(date)

Answer 1

我们可以用slice

 df %>% 
    group_by(grouping_variable) %>% 
    slice(which.min(date))