knitr::opts_chunk$set(echo = TRUE, collapse = TRUE, fig.width = 8, fig.height = 6, dpi = 150)
This is an example report to illustrate how reportfactory
can be used. It
uses a cutdown snapshot of NHS pathways data
that is available in the outbreaks
package. These data include all reports classified as ‘potential COVID-19 cases’
notified via calls to 111, 999, and 111-online systems. These data are not
confirmed cases, and are subject to unknown reporting biases.
library(here) library(incidence2) dat <- read.csv(here("data", "raw", "example_data.csv")) inci <- incidence(dat, date, groups = nhs_region, count = count) if (params$grouped_plot) { plot(inci, angle = 45, ylab = "", title = "Reports by date", centre_ticks = TRUE) } else { facet_plot(inci, angle = 45, ylab = "", title = "Reports by day", centre_ticks = TRUE) }
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.