组合函数combn

x<-c("I1","I2","I3","I4")

t(combn(x,2))
[,1] [,2]
[1,] "I1" "I2"
[2,] "I1" "I3"
[3,] "I1" "I4"
[4,] "I2" "I3"
[5,] "I2" "I4"
[6,] "I3" "I4"

用t()转置后每一行就是所需数据

t(combn(x,3))
[,1] [,2] [,3]
[1,] "I1" "I2" "I3"
[2,] "I1" "I2" "I4"
[3,] "I1" "I3" "I4"
[4,] "I2" "I3" "I4"