如何使用 dplyrs 连接函数在 R 中通过 OR 语句连接 2 个表?
例如,使用键将 df1 加入 df2:df1_ColumnA == df2_ColumnA 或 df1_ColumnA == df2_ColumnB?
library(dplyr)
df1 = data.frame(V1 = c('A', 'B', 'C','D'), v2 = c(1,2,3,4))
df2 = data.frame(VA = c('A', 'B', 'C'), VB = c('D', 'E', 'F'), vC = c(4,5,6))
## Join on column 1
df3 = df1 %>% left_join(df2, by = c('V1' = 'VA'))
## join on column 1 AND column 2
df4 = df1 %>% left_join(df2, by = c('V1' = 'VA', 'V1' = 'VB'))
Run Code Online (Sandbox Code Playgroud)
这是行不通的:
## join on column 1 OR column 2
df4 = df1 %>% left_join(df2, by = c('V1' = 'VA' | 'V1' = 'VB'))
Run Code Online (Sandbox Code Playgroud)
编辑:预期输出
V1 v2 VA VB vC
1 A 1 A D 4
2 B 2 B E 5
3 C 3 C F 6
4 D 4 A D 4
Run Code Online (Sandbox Code Playgroud)
连接OR未实现tidyverse(也可能是错误的)。但是,有一个选项可以将unite感兴趣的列放在一起,然后执行regex_right_join/regex_left_join来自fuzzyjoin
library(fuzzyjoin)
library(dplyr)
df2 %>%
unite(VAB, VA, VB, remove = FALSE) %>%
regex_right_join(df1, by = c("VAB" = "V1")) %>%
select(names(df1), names(df2))
#. V1 v2 VA VB vC
#1 A 1 A D 4
#2 B 2 B E 5
#3 C 3 C F 6
#4 D 4 A D 4
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
1474 次 |
| 最近记录: |