r - R中使用dplyr基于单一条件过滤组

Question

我有两个数据框。 df1

    col1
 1  apples
 2 oranges
 3  apples
 4  banana

df2

   setID    col1
1      1  apples
2      1 oranges
3      1  apples
4      1  banana
5      2  apples
6      2  grapes
7      2 oranges
8      2  apples
9      3 oranges
10     3  grapes
11     3  banana
12     3  banana
13     4  apples
21     4  apples
31     4  banana
41     4 oranges

我使用 dplyr 包中的过滤器通过 df1$col1[1] 缩小 df2 的范围，并将结果放入 tempdf

> tempdf <- df2 %>% filter(df1$col1[1] == df2$col1)
> tempdf
  setID   col1
1     1 apples
2     1 apples
3     2 apples
4     2 apples
5     4 apples
6     4 apples

有没有办法可以看到与匹配的“苹果”具有相同 setID 的所有元素？像这样

         setID    col1
    1      1  apples
    2      1 oranges
    3      1  apples
    4      1  banana
    5      2  apples
    6      2  grapes
    7      2 oranges
    8      2  apples
    13     4  apples
    21     4  apples
    31     4  banana
    41     4 oranges

Answer 1

您可以在 filter 语句中使用 any 来过滤 df2$col1 的任何条目与第一个条目匹配的组df1$col1。

---

数据:

df1 = read.table(text="col1
1  apples
2 oranges
3  apples
4  banana",header=T,stringsAsFactors=F)

df2 = read.table(text="   setID    col1
1      1  apples
2      1 oranges
3      1  apples
4      1  banana
5      2  apples
6      2  grapes
7      2 oranges
8      2  apples
9      3 oranges
10     3  grapes
11     3  banana
12     3  banana
13     4  apples
21     4  apples
31     4  banana
41     4 oranges",header=T,stringsAsFactors=F)

代码:

library(dplyr)
df2 %>% group_by(setID) %>% filter(any(col1==df1$col1[1]))

输出:

# A tibble: 12 x 2
# Groups:   setID [3]
   setID    col1
   <int>   <chr>
 1     1  apples
 2     1 oranges
 3     1  apples
 4     1  banana
 5     2  apples
 6     2  grapes
 7     2 oranges
 8     2  apples
 9     4  apples
10     4  apples
11     4  banana
12     4 oranges

希望这有帮助!