根据顺序删除重复项

Question

在 R 中，我希望删除每个 a 之后的前两个 b 和 c 之后的任何实例(请注意编号) )。我有以下内容:

1   a
2   b
3   c
4   a
5   b
6   c
7   a
8   b
9   c
10  b
11  c
12  a
13  b
14  c
15  c

我希望将其减少为:

1   a
2   b
3   c
4   a
5   b
6   c
7   a
8   b
9   c
12  a
13  b
14  c

如果可能的话，我尝试在 dplyr 管道中执行此操作。有什么想法吗？

Answer 1

这个怎么样？

d <- data.frame(lets = c("a", "b", "c", "a", "b", "c", "a", "b", "c", "b", "c", "a", "b", "c", "c"))
d %>% 
  mutate(lag1 = lag(lets),
         lag2 = lag(lag1)) %>% 
  filter(is.na(lag2) |
         !(lets == lag1 | lets == lag2 | lag1 == lag2)) %>% 
  select(lets)

   lets
1     a
2     b
3     c
4     a
5     b
6     c
7     a
8     b
9     c
10    a
11    b
12    c