どのように2つのテーブルの値を比較することができますか？

Question

私は以下のような2つのデータフレームを持っていますが、これらのテーブルの値を（同じ行と列名に基づいて）一緒に比較し、同じ値をFALSEでTRUEで指定したいと思います。

data1: 

     id    A    B    C 
     m1    2    2    2 
     m2    2    1    2 

data2: 

     id    A    D    B 
     m1    1    2    2 
     m2    2    3    2 


Output: 

     id     A    B 
     m1    FALSE   TRUE 
     m2    TRUE   FALSE 

Answer 1

あなたはmelt INGの後に2つのデータフレームをmergeすることができますidによって交差する列を見つける。次に、値の等価条件を指定して新しい列を生成します。最終的にdcast出力テーブルのワイドフォーマットに戻る：

library(reshape2) 
df1 <- melt(data1,"id") 
df2 <- melt(data2,"id") 
df3 <- merge(df1,df2,by=c("id","variable")) 
df3$value <- df3$value.x == df3$value.y 
result <- dcast(df3, id~variable) 
##id  A  B 
##1 m1 FALSE TRUE 
##2 m2 TRUE FALSE 

Answer 2

、両方のデータセットに共通している列名のインデックスを作成してそれに基づいてデータセットをサブセットとの比較（==）を行う

nm1 <- intersect(names(data1), names(data2)) 
cbind(data1[1], data1[nm1][-1]==data2[nm1][-1]) 
# id  A  B 
#1 m1 FALSE TRUE 
#2 m2 TRUE FALSE