以某种方式联合数据帧,用相同的 row.name 更新行
Union dataframes in some way that updates rows with same row.name
我想合并两个数据框,它们共享一些具有相同 rowName 的行。对于那些具有共同 rowNames 的行,我想考虑第二个数据框值,而不是第一个。例如:
df1 <- data.frame(col1 = c(1,2), col2 = c(2,4), row.names = c("row_1", "row_2"))
df1
# col1 col2
# row_1 1 2
# row_2 2 4
df2 <- data.frame(col1 = c(3,6), col2 = c(10,99), row.names = c("row_3", "row_2"))
df2
# col1 col2
# row_3 3 6
# row_2 10 99
我想得到的结果是:
someSpecificRBind(df1,df2, takeIntoAccount=df2)
# col1 col2
# row_1 1 2
# row_2 10 99
# row_3 3 6
函数 rbind 没有完成这项工作,实际上它更新了常用行的行名。
我们得到 duplicated
个元素的索引并将其用于 filter
rbind(df2, df1)[!duplicated(c(row.names(df2), row.names(df1))),]
我将其概念化为仅向 df2
添加 df1
中尚不存在的行:
rbind(df2, df1[setdiff(rownames(df1), rownames(df2)), ])
我想合并两个数据框,它们共享一些具有相同 rowName 的行。对于那些具有共同 rowNames 的行,我想考虑第二个数据框值,而不是第一个。例如:
df1 <- data.frame(col1 = c(1,2), col2 = c(2,4), row.names = c("row_1", "row_2"))
df1
# col1 col2
# row_1 1 2
# row_2 2 4
df2 <- data.frame(col1 = c(3,6), col2 = c(10,99), row.names = c("row_3", "row_2"))
df2
# col1 col2
# row_3 3 6
# row_2 10 99
我想得到的结果是:
someSpecificRBind(df1,df2, takeIntoAccount=df2)
# col1 col2
# row_1 1 2
# row_2 10 99
# row_3 3 6
函数 rbind 没有完成这项工作,实际上它更新了常用行的行名。
我们得到 duplicated
个元素的索引并将其用于 filter
rbind(df2, df1)[!duplicated(c(row.names(df2), row.names(df1))),]
我将其概念化为仅向 df2
添加 df1
中尚不存在的行:
rbind(df2, df1[setdiff(rownames(df1), rownames(df2)), ])