格式化复制（）

Question

我试图从经验上找出概率问题的答案，

“如果总和是8”，那么第一次掷出2的概率是6的概率是多少。

我想要一个2列矩阵或数据帧，结果为n = 1000掷2次死亡。

sample(1:6, 2, replace=T)

给了我一次，但是

replicate(1000,sample(1:6,2, replace=T))

给了我不可读的输出。我试过了

as.matrix(replicate(1000,sample(1:6,2, replace=T)), nrow=1000, ncol=2) #and
do.call(cbind,list(rolls))

并且都没有给出我正在寻找的两种列格式

Answer 1

nThrows <- 1000
matrix(sample(1:6, nThrows * 2, replace = TRUE), ncol = 2)

相反或复制2次投掷1000次只需抽样2000个数字并将它们分成两个列矩阵。