如何迭代地比较两个数据帧之间的计数数据

Question

我有两个数据框，例如

(df1<- data.frame( a=c(1,3,5,6,3),b=c(4,8,5,7,3),c=c(4,5,2,9,5)))
  a b c
1 1 4 4
2 3 8 5
3 5 5 2
4 6 7 9
5 3 3 5

(df2<- data.frame( a=c(2,3,4,9,7),b=c(3,8,5,2,3),c=c(1,7,2,9,4)))
  a b c
1 2 3 1
2 3 8 7
3 4 5 2
4 9 2 9
5 7 3 4

我想比较两个dfs列，即df1 $ a == df2 $ a等等....

量化匹配== 1＆amp; mismatch == 0 .....有没有任何统计方法来证明两个dfs中数据的差异.....

Answer 1

table(as.data.frame(df1 == df2))

, , c = FALSE

       b
a       FALSE TRUE
  FALSE     1    1
  TRUE      0    1

, , c = TRUE

       b
a       FALSE TRUE
  FALSE     1    1
  TRUE      0    0

这有点我在寻找，但看起来太乱了......也许有更好的方法来获得紧凑的输出......

'这是一个更好的汇总输出

sapply(as.data.frame(df1 == df2),function(x) table(x))
      a b c
FALSE 4 2 3
TRUE  1 3 2