如果向量包含重复元素,如何在 R 中查找唯一排列?

r programmingserver side programmingprogramming更新于 2025/4/13 15:37:17

我们可以使用 combinat 包中的 permn 函数来查找排列,但如果向量中有重复元素,则结果将不具有唯一排列,因此,我们需要将 unique 函数与 permn 函数一起使用。例如,如果我们有一个向量 1、2、1,那么排列将是 (1 2 1)、(1 1 2)、(1 1 2)、(1 2 1)、(2 1 1)、(2 1 1),而唯一排列将是 (1 2 1)、(1 1 2)、(2 1 1)。

示例

x1<-c(1,2,1,2)
x1

输出

[1] 1 2 1 2

查找所有排列 −

permn(x1)

[[1]]
[1] 1 2 1 2
[[2]]
[1] 1 2 2 1
[[3]]
[1] 1 2 2 1
[[4]]
[1] 2 1 2 1
[[5]]
[1] 2 1 1 2
[[6]]
[1] 1 2 1 2
[[7]]
[1] 1 1 2 2
[[8]]
[1] 1 1 2 2
[[9]]
[1] 1 1 2 2
[[10]]
[1] 1 1 2 2
[[11]]
[1] 1 2 1 2
[[12]]
[1] 2 1 1 2
[[13]]
[1] 2 1 2 1
[[14]]
[1] 1 2 2 1
[[15]]
[1] 1 2 2 1
[[16]]
[1] 1 2 1 2
[[17]]
[1] 2 1 1 2
[[18]]
[1] 2 1 2 1
[[19]]
[1] 2 2 1 1
[[20]]
[1] 2 2 1 1
[[21]]
[1] 2 2 1 1
[[22]]
[1] 2 2 1 1
[[23]]
[1] 2 1 2 1
[[24]]
[1] 2 1 1 2

寻找独特的排列 −

unique(permn(x1))

[[1]]
[1] 1 2 1 2
[[2]]
[1] 1 2 2 1
[[3]]
[1] 2 1 2 1
[[4]]
[1] 2 1 1 2
[[5]]
[1] 1 1 2 2
[[6]]
[1] 2 2 1 1

示例

x2<-c(0,1,0) permn(x2)

[[1]]
[1] 0 1 0
[[2]]
[1] 0 0 1
[[3]]
[1] 0 0 1
[[4]]
[1] 0 1 0
[[5]]
[1] 1 0 0
[[6]]
[1] 1 0 0

unique(permn(x2))

[[1]]
[1] 0 1 0
[[2]]
[1] 0 0 1
[[3]]
[1] 1 0 0

相关文章