Блог

У меня есть набор данных, структурированный следующим образом:

  df <- c()
 df$Var1 <- c("cat", "dog", "pig", "cat", "cat", "pig")
 df$Var2  <- c("A", "B", "C", "B", "C", "A")
 df <- as.data.frame(df)



Var1.  Var2.

cat.    A
dog.    B
pig.    C
cat.    B
cat.    C
pig.    A
  

С помощью pairwise_count я получил фрейм данных, состоящий из трех столбцов, первый и второй состоят из элементов, принадлежащих первому столбцу исходного фрейма данных, третий — это количество общих элементов Var2, которые имеют элементы Var1.

  df <- pairwise_count(df, Var1, Var2)

# A tibble: 4 x 3
item1 item2     n
<fct> <fct> <dbl>
1 dog   cat     1
2 pig   cat     2
3 cat   dog     1
4 cat   pig     2
  

Я хочу получить новый фрейм данных, в котором есть четвертый столбец, что делает общие элементы явными.

  item1 item2    n  common_el

  dog   cat     1     B
  pig   cat     2     A
  pig   cat     2     C
  cat   dog     1     B
  cat   pig     2     A
  cat   pig     2     C
  

Как я могу продолжить?

Спасибо за ваши предложения!