数据框的行频率忽略 R 中的列顺序

Question

我想为数据框的行构建频率表。

我已经找到了如何做到这一点，但要考虑列的顺序。我希望找到忽略列顺序的频率。

例如:

0   A       B     
1   B       A     
2   C       D      
3   D       C     
4   C       D

我希望获得:

A B 2
C D 3

提前致谢。

Answer 1

library("tidyverse")

x <- read.table(
  text = "0   A       B
          1   B       A
          2   C       D
          3   D       C
          4   C       D",
  stringsAsFactors = FALSE)

x %>%
  # Specify the columns to combine explicitly (here V2 and V3)
  # Then sort each pair and paste it into a single string
  mutate(pair = pmap_chr(list(V2, V3),
                         function(...) paste(sort(c(...)), collapse = " "))) %>%
  count(pair)
#> # A tibble: 2 x 2
#>   pair      n
#>   <chr> <int>
#> 1 A B       2
#> 2 C D       3

^{由 reprex package 创建于 2019-03-29 (v0.2.1)}