仅合并R中第一行的两个数据集

Question

我需要合并两个数据集，但在第二个数据集中，可能存在重复的id，例如几个id为1,1,1。如果有重复的id，如何合并到它们的第一行？

更清楚，这是一个可重复的例子：

^(?!.*\\.tmp$)(?:AMDF|SB700)\\w*\\.\\w+$

Eaxample：在输出中我期望这种格式

df1
structure(list(id = 1:2, y = 10:11), .Names = c("id", "y"), class = "data.frame", row.names = c(NA, 
-2L))

df2
structure(list(id = c(1L, 1L, 1L, 2L), x1 = 435:438, x2 = c(435L, 
436L, 436L, 438L), x3 = c(435L, 436L, 436L, 438L)), .Names = c("id", 
"x1", "x2", "x3"), class = "data.frame", row.names = c(NA, -4L
))

即。 2行和3行（1个id）不参与合并。

Answer 1

您可以使用data.table执行此操作。您可以仅保留第二个数据集中id == 1的第一个匹配项，然后保留merge这两个数据集。

以下是解决方案：

library(data.table)
setDT(df2)
df2[, idx := 1:.N, by = id]
df2 <- df2[idx == 1, ]
df2[, idx := NULL]
output <- merge(df1, df2, by = "id")
output

它会为您提供所需的输出：

 id  y  x1  x2  x3
1  1 10 435 435 435
2  2 11 438 438 438