Observed epidemic process with the incompleteness line

The "epidemic" panel of autoplot(), drawn on its own: the latest reported counts per event_date, with a dashed vertical line marking where the data become incomplete (less than level of the delay distribution has arrived). Holidays from an attached temporal_effects() spec are marked with red dots.

plot_epidemic_process() draws the same curve without the incompleteness line, next to its reporting twin plot_reporting_process().

Usage

plot_observed_cases(x, ...)

Arguments

x

A tbl_now() object.

...

Further arguments passed to autoplot.tbl_now(), e.g. level, by_strata, strata, event_date_xlim, plotly or palette.

Value

A ggplot2 object (or a plotly widget when plotly = TRUE).

See also

autoplot.tbl_now(), plot_epidemic_process(), plot_reporting_process().

Examples

data(denguedat)
dengue_now <- tbl_now(denguedat, onset_week, report_week, verbose = FALSE)
plot_observed_cases(dengue_now)