如何将数据帧 1 的每一行与数据帧 2 的每一行进行比较，如果值相同则求和？

Question

假设您有两个大小相同的数据框，包含 TRUE、FALSE 或 NA 的条目：

df1 <- data.frame(a = c(T, F, F, F, T), b=c(F, NA, NA, F, T))
View(df1)

df2 <- data.frame(a = c(T, T, T, F, NA), b=c(T, NA, T, F, T))
View(df2)

现在您想查看 df1 的每一行中有多少条目与 df2 中的完全相同。结果应如下所示：

SumOfSimilarValuesPerRow <- data.frame(Result = c(1, 0, 0, 2, 1))
View(SumOfSimilarValuesPerRow)

所以首先你可能需要将 df1 的每一行中的每个条目与 df2 中的相同条目进行比较，然后总结结果。

我尝试了双循环，但我不断收到错误

missing value where TRUE/FALSE needed

尝试以下操作时：

for (i in 1:5) {
  for (j in 1:2) {
    if(df1[i, j] == df2[i, j]) {
      print("OK")
    } 
  }
}

我还没有尝试总结结果，因为我已经在努力比较每个条目。

有谁知道，这将如何以易于理解的方式工作？

任何帮助将不胜感激！

Answer 1

你可以这样做

rowSums(df1 == df2, na.rm = TRUE)

== 进行逐个元素的比较，这可以满足您的问题的要求，因为您的 df1 和 df2 具有相同的大小（和结构）。