合并 2 个 R 数据帧，保持第二个数据帧的匹配行和第一个数据帧不匹配

Question

我想通过以下方式匹配 id 列来合并 2 个数据帧

dfmain = 
  id  name val res
1  1    a    
2  2    b    
3  3    c    
4  4    d    
5  5    e   

和

dfsub = 
  id name  val    res
1  2 two   true   thanks
2  4 four  false  Sorry

得到

dfmain =
   id  name  val    res
1:  1  a      
2:  2  two   true   thanks
3:  3  c      
4:  4  four  false  Sorry
5:  5  e      

请注意-

1. 两个数据框中的列的数量和名称将保持不变
2. 第二个数据帧中的 id 值始终是第一个数据帧中的子集

目前我正在使用 anti_join 函数在第一个数据帧中获取不匹配的行并将第二个数据帧加入这些行

有没有更有效的方法来做到这一点？

尝试使用 data.table 库中的 setDT，但我一次只能更新一列的值。

很抱歉，如果我缺少任何明显的解决方案，因为我是 R 新手，任何帮助都将不胜感激

Answer 1

你可以试试（感谢@Anoushiravan R 提供的数据）

library(data.table)
library(dplyr)

setDT(dfsub)[setDT(dfmain),
  on = "id"
][,
  names(dfmain),
  with = FALSE
][
  ,
  Map(coalesce, .SD, dfmain)
]

给了

   id name   val    res
1:  1    a    NA   <NA>
2:  2  two  TRUE thanks
3:  3    c    NA   <NA>
4:  4 four FALSE  Sorry
5:  5    e    NA   <NA>

Answer 2

我希望这是您的想法，否则请告诉我。我注意到您仅通过保留 dfsub 的列将 dfmain 中的行替换为 dfsub 中具有相同 id 的行，所以我认为这可能会让您得到您想要的：

library(dplyr)

dfmain <- tribble(
    ~id,  ~name, ~ val, ~ res,
  1,    "a",    NA,     NA,
  2,    "b",    NA,     NA,
  3,    "c",    NA,     NA,
  4,    "d",    NA,     NA,
  5,    "e" ,   NA,     NA
)

dfsub <- tribble(
    ~id, ~name,  ~val,    ~res,
  2, "two",   TRUE,   "thanks",
  4 ,"four",  FALSE,  "Sorry"
)

dfmain %>%
  filter(! id %in% dfsub$id) %>%
  bind_rows(dfsub) %>%
  arrange(id)

# A tibble: 5 x 4
     id name  val   res   
  <dbl> <chr> <lgl> <chr> 
1     1 a     NA    NA    
2     2 two   TRUE  thanks
3     3 c     NA    NA    
4     4 four  FALSE Sorry 
5     5 e     NA    NA