Load library and the data The data is scrapped from the website of the Nigerian Centre for Disease Control (NCDC) i.e (NCDC 2020). The scrapping was done with some bits of tricks. Please see my post on that. The BREAKS were established from the visual inspection of the data (see (Nmadu, Yisa, and Mohammed 2009))
library(tidyverse) library(splines) library(Metrics) library(scales) library(readxl) library(patchwork) library(Dyn4cast) BREAKS <- c(70, 131, 173, 228, 274, 326) z.