在R中的semi_join但是重新拉回副本

Question

我在dplyr中遇到了semi_join的问题。理想情况下，我想对dfB进行dfA半连接。 dfA具有重复值，dfB也是如此。我想从dfA中撤回所有与dfB匹配的值，甚至是dfA中的重复项。

dfA              dfB               >>     dfC
x    y    z      x    g                   x    y    z   
1    r    5      1    lkm                 1    r    5
1    b    4      1    pok                 1    b    4
2    4    e      2    jij                 2    4    e
3    5    r      2    pop                 3    5    r
3    9    g      3    hhg                 3    9    g
4    3    0      5    trt

我想得到的是上面的dfC输出。因为x至少匹配1匹配，所以它会拉回dfA中的所有x

semi_join(dfA, dfB, by = "x")
dfC
x    y    z  
1    r    5
2    4    e
3    5    r


inner_join(dfA, dfB, by = "x")
x    y    z    g  
1    r    5    lkm
1    r    5    pok
1    b    4    lkm
1    b    4    pok
2    4    e    jij
2    4    e    pop
3    5    r    hhg
3    9    g    hhg

两者都没有给我正确的结果。任何帮助都会很棒！提前致谢

Answer 1

不确定为什么需要join：只需在％

中使用％

library(data.table)
setDT(dfA)[x %in% dfB$x,]

# simple base R approach :
dfA[dfA$x %in% dfB$x,]

Answer 2

如果您正在使用dplyr并继续将其传递给管道

library(dplyr)
dfA %>% filter(x %in% dfB$x)