enter image description here我正在尝试进行蒙特卡洛模拟，但不知道如何编写代码。我需要在不使用rbinom的情况下绘制10个骰子中的滚动六点分布。
我尝试使用复制功能，但直方图显示不正确。
dat <- replicate(n=10, expr = sum(runif(10, min=0, max=1)>1/6))
hist(dat, prob=TRUE)
我认为，由于这是模拟实验，我预计将进行10,000次试验（我的教授认为如此），但我不知道将试验次数放在哪里。enter image description here
