70%的数字 - > 1

Question

什么是最有效的解决方案？100"0"和"1"的样本.

sample(0:1, 100, replace=TRUE, prob=NULL)

A)所有生成数字的70%应为"1".

B)所有生成数字的80%应为"1".

什么是允许这种分发的论证/或库？

Answer 1

关于什么:

rbinom(1, n = 100, prob = .7)

Answer 2

要准确获得x苹果和y橙子,您可以构建这样的矢量并对其进行采样:

sample(c(rep("apple", x), rep("orange", y)))

在你的情况下:

sample(c(rep(1, 70), rep(0, 100 - 70)))