认沽结果中的R

Question

列名我要的结果转换这个功能的：

> combn(1:9,6) 
     [,75] [,76] [,77] [,78] [,79] [,80] [,81] [,82] [,83] [,84] 
[1,]  2  2  2  3  3  3  3  3  3  4 
[2,]  4  4  5  4  4  4  4  4  5  5 
[3,]  5  6  6  5  5  5  5  6  6  6 
[4,]  7  7  7  6  6  6  7  7  7  7 
[5,]  8  8  8  7  7  8  8  8  8  8 
[6,]  9  9  9  8  9  9  9  9  9  9 

在包含每一列的结果为“文本”的载体。我使用“粘贴”功能，但我只能唯一列做到这一点：

> paste(combn(1:9,6)[,84], collapse = '-') 
[1] "4-5-6-7-8-9" 

而且我希望有这样的84个值的向量：

> comb 
[1] "4-5-6-7-8-9" "3-4-5-6-7-8".... 

谢谢你许多。

Answer 1

我们可以使用FUN论点combn

v1 <- combn(1:9,6, FUN = paste, collapse="-") 
length(v1) 
#[1] 84 
v1[84] 
#[1] "4-5-6-7-8-9"