如果通过筛选,则保留同一组中的行

 df <- data.frame(sample = c("R1", "R2", "R2", "R2", "R3", "R3"), event = c(1, 10, 10, 20, 3, 3), name = c('foo', 'bar', 'baz', 'baz', 'foo', 'baz'))

我想选择按分组的行 sample 和 event name == 'baz' .

所需输出:

  sample event name
2     R2    10  bar # another row in same sample, event group has name == 'baz' 
3     R2    10  baz
4     R2    20  baz
5     R3     3  foo # another row with same sample, event group has name == 'baz' 
6     R3     3  baz

  df %>% 
    group_by(sample, event) %>% 
    filter(name == 'baz')