Найти самый низкий результат в каждой группе

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))