From d03f00ee7f1f8409ec7d9b63d54b059108c82806 Mon Sep 17 00:00:00 2001 From: Sam Date: Wed, 20 Dec 2023 21:54:13 +0000 Subject: [PATCH] Hotfix: Missing example_ in epinow2.Rmd vignette --- vignettes/epinow.Rmd | 4 ++-- vignettes/epinow.Rmd.orig | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/vignettes/epinow.Rmd b/vignettes/epinow.Rmd index 1365e07de..2ad1c5bb0 100644 --- a/vignettes/epinow.Rmd +++ b/vignettes/epinow.Rmd @@ -85,7 +85,7 @@ To then run this on multiple regions using the default options above, we could u ```r region_rt <- regional_epinow( reported_cases = cases, - generation_time = generation_time_opts(generation_time), + generation_time = generation_time_opts(example_generation_time), delays = delay_opts(delay), rt = rt_opts(prior = rt_prior), ) @@ -132,7 +132,7 @@ gp <- modifyList(gp, list(realland = NULL), keep.null = TRUE) rt <- opts_list(rt_opts(), cases, realland = rt_opts(rw = 7)) region_separate_rt <- regional_epinow( reported_cases = cases, - generation_time = generation_time_opts(generation_time), + generation_time = generation_time_opts(example_generation_time), delays = delay_opts(delay), rt = rt, gp = gp, ) diff --git a/vignettes/epinow.Rmd.orig b/vignettes/epinow.Rmd.orig index 94a5f8d2b..ad41f91d1 100644 --- a/vignettes/epinow.Rmd.orig +++ b/vignettes/epinow.Rmd.orig @@ -78,7 +78,7 @@ To then run this on multiple regions using the default options above, we could u ```{r regional_epinow, fig.width = 8} region_rt <- regional_epinow( reported_cases = cases, - generation_time = generation_time_opts(generation_time), + generation_time = generation_time_opts(example_generation_time), delays = delay_opts(delay), rt = rt_opts(prior = rt_prior), ) @@ -96,7 +96,7 @@ gp <- modifyList(gp, list(realland = NULL), keep.null = TRUE) rt <- opts_list(rt_opts(), cases, realland = rt_opts(rw = 7)) region_separate_rt <- regional_epinow( reported_cases = cases, - generation_time = generation_time_opts(generation_time), + generation_time = generation_time_opts(example_generation_time), delays = delay_opts(delay), rt = rt, gp = gp, )