R：矢量化样本，每次采样的概率都不同

Question

我正在尝试对10个0或1的值进行采样，每次都定义（但不同）概率。

这不起作用：

sample(0:1, size = 10, replace = T, prob = seq(0.1, 1, 0.1))

这确实有效：

sapply(seq(0.1, 1, 0.1), function(x) sample(0:1, size = 1, prob = c(1-x, x)))

第十个值始终为1，而第一个值具有1的1/10概率为1-这是我想要实现的。

有矢量化方法吗？

Answer 1

您想从二项分布中进行采样：

rbinom(10, 1, prob = seq(0.1, 1, 0.1))