r - 在R中生成非重复组合对

抱歉，您的标题不是描述性的，但我不知道我要达到的目标。

假设我有一个不同类别的名称列表，例如

c( '1', '2', '3', '4')

我想从中生成所有可能的置换对，以便没有反向重复。所以我想要的是

'1' '2'
'1' '3'
'1' '4'
'2' '3'
'2' '4'
'3' '4'

请注意，我没有'2' '1'，因为我已经有'1' '2'。有简单的方法可以在R中实现吗？

最佳答案

> x<-c('1','2','3','4')
> combn(x,2)
     [,1] [,2] [,3] [,4] [,5] [,6]
[1,] "1"  "1"  "1"  "2"  "2"  "3"
[2,] "2"  "3"  "4"  "3"  "4"  "4"