🌈 搜索
📅 最后修改于: 2022-03-11 14:50:56.841000 🧑 作者: Mango
set.seed(3) lambda <- 0.2 num_sim <- 1000 sample_size <- 40 sim <- matrix(rexp(num_sim*sample_size, rate=lambda), num_sim, sample_size) row_means <- rowMeans(sim)