一个我无法理解的简单查询:
示例数据集:
ACH_DATE CODE
1 31OCT2018 A81001
2 31JAN2019 A81001
3 31OCT2018 A81002
4 31JAN2019 A81002
5 31OCT2018 A81003
6 31JAN2019 A81004
我想group_by
在CODE
变量上ACH_DATE
进行过滤,如果一个组有多于一行,则删除其中的行ACH_DATE == "31OCT2018"
。
样本数据:
df <- structure(list(ACH_DATE = c("31OCT2018", "31JAN2019", "31OCT2018",
"31JAN2019", "31OCT2018", "31JAN2019"), CODE = c("A81001", "A81001",
"A81002", "A81002", "A81003", "A81004")), row.names = c(NA, 6L
), class = "data.frame")
我们按“CODE”分组,创建一个包含行数和“ACH_DATE”的逻辑向量
library(dplyr)
df %>%
group_by(CODE) %>%
filter((n() > 1 & ACH_DATE != "31OCT2018") | n() == 1)
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句