对于此样本矢量:
x = c(3,8,2)
我希望结果看起来像这样:
[,1] [,2] [,3]
[1,] 1 1 1
[2,] 1 1 2
[3,] 1 2 1
...
[48,] 3 8 2
我知道expand.grid可以完成这项工作,但是,我似乎找不到在每一列中允许使用不同集合的参数。
答案 0 :(得分:4)
我们获得每个元素(seq
)的顺序,然后执行expand.grid
out <- expand.grid(lapply(x, seq))
dim(out)
#[1] 48 3