diff --git a/vignettes/approx-inference.Rmd b/vignettes/approx-inference.Rmd index 819992611..bb91d8eee 100644 --- a/vignettes/approx-inference.Rmd +++ b/vignettes/approx-inference.Rmd @@ -146,7 +146,7 @@ linelist_data <- as_epidist_linelist_data( obs_time = obs_cens_trunc_samp$obs_time ) -data <- as_epidist_latent_model(linelist_data) +data <- as_epidist_marginal_model(linelist_data) t <- proc.time() fit_hmc <- epidist(data = data, algorithm = "sampling", backend = "cmdstanr")