Draw `n` random samples, with replacement, from the historical recruitment timeseries.

resample_recruitment(n, hist_rec, seed = NA)

Arguments

n

number of samples to draw

seed

a random seed (optional)

hist.rec

historical recruitment vector

Value

`n` random samples from the historical recruitment timeseries.

Examples

set.seed(1120)
n <- 100
hist.rec <- c(100, 200, 50, 100, 120)
resample.recruitment(n, hist.rec)