比较两个数据帧中的元素

Question

我想逐个元素地比较两个data.frame 中的元素，称为df1 和df2。从他们那里，我想建立一个新的data.frame，叫做out。如果元素相等，则out中的元素为1，否则为0。

MWE

set.seed(1)
df1 <- data.frame(Q1 = sample(letters[1:5], 2, replace = TRUE), 
                 Q2 = sample(letters[1:5], 2, replace = TRUE))    
set.seed(2)
df2 <-  data.frame(Q1 = sample(letters[1:5], 2, replace = TRUE), 
                   Q2 = sample(letters[1:5], 2, replace = TRUE))

预期输出

out <- data.frame(Q1 = c(0, 0), Q2 = c(1, 0))

Answer 1

如果在创建data.frame 时使用stringsAsFactors = FALSE 创建数据集，则factor 会很困难，因为属性会导致比较困难）

+(df1 == df2)

---

或者如果它是factor 转换为character 列与type.convert

+(type.convert(df1, as.is = TRUE) == type.convert(df2, as.is = TRUE))

或者利用matrix hack方式改成character

+(as.matrix(df1) == as.matrix(df2))