最新消息:雨落星辰是一个专注网站SEO优化、网站SEO诊断、搜索引擎研究、网络营销推广、网站策划运营及站长类的自媒体原创博客

group

运维笔记admin2浏览0评论

group

group

tmf*_*mnk 5

如果可以有多个Yes值:

df %>% group_by(Code) %>% slice(if(all(Inst != "Yes")) 1:n() else which(Inst == "Yes")) Code Inst <chr> <chr>1 a Yes 2 b No 3 b No 4 b No 5 b No 6 b No

考虑到更新的问题:

df %>% mutate(Date = as.Date(Date, format = "%Y-%m-%d")) %>% group_by(Code) %>% slice(if(all(Inst != "Yes")) 1:n() else which(Inst == "Yes")) %>% filter(Date == min(Date)) Code Inst Date <chr> <chr> <date> 1 a Yes 2021-01-012 b No 2021-01-063 b No 2021-01-064 b No 2021-01-06

group

发布评论

评论列表(0)

  1. 暂无评论