R. 仅加入重复项一次

Question

我需要帮助来通过一个键连接两个重复的数据框。我只想为每个副本合并一次，而我不能用 dplyr::left_join 来完成。

示例:

    ds1 <- data.frame(
      id = c(1,1,1,2,2),
      V2 = c(5,6,7,5,8)
      )
    ds2<-data.frame(
      id=c(1,2),
      Value=c(56,98)
      )
    ds3<-left_join(ds1, ds2, by="id")

在这种情况下，我有:

# id V2 Value
1  1  5    56
2  1  6    56
3  1  7    56
4  2  5    98
5  2  8    98

但我需要:

# id V2 Value
1  1  5    56
2  1  6    
3  1  7    
4  2  5    98
5  2  8

Answer 1

保留您的代码并添加以下代码:

ds3$Value[duplicated(ds3[c("Value","id")])] <- NA
#   id V2 Value
# 1  1  5    56
# 2  1  6    NA
# 3  1  7    NA
# 4  2  5    98
# 5  2  8    NA