if(interactive()) {
input <- md_prepare(
data = buffalo,
models = models,
species = "buffalo",
n_individuals = 5,
dur = list(value = 1, unit = "month"),
dti = list(value = 1, unit = "day"),
add_individual_variation = TRUE,
set_target = "hr",
which_meta = "mean"
)
output <- md_run(input)
}
Run the code above in your browser using DataLab