powered by
sim_n_persons_x_times
sim_n_persons_x_times_many_n(prob, n = seq(10, 80, by = 10), a = 7, ap = rep(1/length(a), length(a)), times = 100, progress = "text")
sim_n_persons
sim_one_person
## Not run: # r <- sim_n_persons_x_times_many_n(dexp(1:30, .05), a = 7, times = 100) # r <- sim_n_persons_x_times_many_n(dexp(1:30, .05), a = 5:7, ap = 1:3, times = 100) # ## End(Not run)
Run the code above in your browser using DataLab