比较小标题列

Question

有没有一种方法可以将一个小标题中的列与另一个小标题中的列进行比较？例如，我有以下数据：

library(dplyr)

df1 <- tibble(
  col1 = c(5,7,6,2),
  col2 = c(5, 7, 4, 8))

df2 <- tibble( 
  col1 = c(5,7,6,2),
  col2 = c(5, 3, 5, 12))

我希望能够将df1与df2进行比较，并获得如下输出：

comparison <- tibble(
col1 = c(TRUE, TRUE, TRUE, TRUE),
col2 = c (TRUE, FALSE, FALSE, FALSE)

Answer 1

正如@Sotos在评论中指出的那样，df1==df2有效！如果您希望结果是小标题，则需要(df1==df2) %>% as_tibble()（需要括号）...

如果您想更努力地工作：可以在{R}中使用Map或mapply：

Map(`==`,df1,df2) %>% as_tibble()

或在tidyverse中：

map2(df1,df2,`==`) %>% as_tibble()