需要帮助在Rstudio中创建大样本

Question

Q1.2创建合成样品
使用404,638的大小创建一个合成样本，其中67.8％的释放囚犯用1编码，其余的编码为0。 1.3创建bootstrap采样分布
通过使用1000次复制引导样本来创建引导程序采样分布。

我搜索了几个网站，我只是想知道如何创建这个示例任何帮助将不胜感激

Answer 1

更好地确保家庭作业警察不会巡逻......？另外你没有提供任何代码，但我感觉很慷慨，所以这可能会帮助你：

prisoners <- sample(x = 1:0, size = 404638, prob = c(0.678, 1 - 0.678), replace = TRUE)
prop.table(table(prisoners))
# prisoners
#         0         1 
# 0.3225772 0.6774228 

boot_samples <- lapply(1:1000, function(i) sample(prisoners, replace = TRUE))
# > str(boot_samples)
# List of 1000
# $ : int [1:404638] 1 0 0 1 1 1 1 1 1 0 ...
# $ : int [1:404638] 0 0 0 1 1 0 1 1 1 1 ...
# $ : int [1:404638] 1 0 1 1 1 1 1 1 1 1 ...
# $ : int [1:404638] 1 1 1 1 1 0 1 0 1 1 ...
# $ : int [1:404638] 0 1 1 0 1 1 1 0 1 1 ...
# $ : int [1:404638] 0 0 0 0 0 0 0 1 1 1 ...
# ... and many more ...