## Generate the bootstrap_moby data set
if (FALSE) {
data(moby)
m = displ$new(moby)
bs = bootstrap(m, no_of_sims=5000, threads=4, seed=1)
}
#' ## Generate the bootstrap_p_moby data set
if (FALSE) {
bs_p = bootstrap_p(m, no_of_sims=5000, threads=4, seed=1)
}
Run the code above in your browser using DataLab