test_that("Execution and output: plot_de_pieces function", {
hmde_run(chains = 1, iter = 50, cores = 1,
output <- hmde_extract_estimates(fit = multi_ind_trout,
test_that("Execution and output: bad input", {

"Execution and output: plot_de_pieces function"

Execution and output: plot_de_pieces function

test_that("Execution and output: plot_obs_est_inds function", {
plot <- hmde_plot_obs_est_inds(n_ind_to_plot = 2,

"Execution and output: plot_obs_est_inds function"

Execution and output: plot_obs_est_inds function