Rは異なるデータフレーム列のrownamesと一致し、1（一致する場合）と0（一致しない場合）を置き換えます。

Question

一致する列について質問があり、一致する場合は1に、一致しない場合は0に置き換えます。私は列名を持つ行列を持っています。私は、他の3つのデータフレーム列とikをマッチさせ、マッチしているかどうかその行列を置き換えたいと思います。

最後に私は、この行列を作成する：

dataframe1 dataframe2 dataframe3 
aaa 1  0  0 
aab 0  1  0 
aac 1  0  0 
aad 0  1  1 
aae 1  1  1 

dataframe1 <- c("aaa","aac","aae") 
dataframe2 <- c("aab","aad","aae") 
dataframe3 <- c("aad","aae") 

誰もがこれで私を助けることができますか？ここで

Answer 1

あなたが行く：

df1 <- c("aaa","aac","aae") 
df2 <- c("aab","aad","aae") 
df3 <- c("aad","aae", "x", "y") 

dfs <- list(df1=df1, df2=df2) 

zz <- sapply(dfs, function(x)df3 %in% x) 
rownames(zz) <- df3 
zz 
     df1 df2 
aad FALSE TRUE 
aae TRUE TRUE 
x FALSE FALSE 
y FALSE FALSE