r - 合并两个 data.frames 并替换

Question

我有两个数据集。第一个较小，但数据更精确。我需要加入他们，但是:1. 如果我在 Data1 中有一些数据 - 我只使用这些数据。2. 如果我在 Data1 中没有数据，但它们在 Data2 中 - 我仅使用 Data2 中的数据。

Data1 <- data.frame(
    X = c(1,4,7,10,13,16),
    Y = c("a", "b", "c", "d", "e", "f")
)

Data2 <- data.frame(
    X = c(1:10),
    Y = c("a", "b", "c", "d", "e", "f", "g", "h", "i", "j")
)

所以我的 data.frame 应该是这样的:

DataJoin <- data.frame(
    X = c(1,4,7,10,13,16,7,8,9,10),
    Y = c("a", "b", "c", "d", "e", "f", "g", "h", "i", "j")
)

我怎样才能做到这一点？我尝试过以某种方式选择合并表单基础包和 data.table 包，但我无法按照我的意愿实现它。

Answer 1

无需加入。您可以将问题重新表述为“将在 Data2 中找到但在 Data1 中未找到的数据添加到 Data1”。所以简单地做:

id <- Data2$Y %in% Data1$Y
DataJoin <- rbind(Data1,Data2[!id,])

给予:

> DataJoin
    X Y
1   1 a
2   4 b
3   7 c
4  10 d
5  13 e
6  16 f
7   7 g
8   8 h
9   9 i
10 10 j