This data is the SIR formulation of 188 cases of measles among children in the German city of Hagelloch, 1861, and is a reformulation of the data in hagelloch_raw. Each row is asssociated with 1 day (where t tells the number of days after the start of the outbreak), and the rest of the columns report the number of individuals suspectable, infected, and in recovery.

hagelloch_sir

Format

A data frame with 95 rows and 4 columns

t

time since outbreak, \(t = 0, \dots, T=94\)

S

Number of individuals suspectable

I

Number of individuals infected

R

Number of individuals in recovery

Details

Note that \(s_t + i_t + r_t = 188\) for each row \(t in 0, \dots, 94\).

Examples

## show first few cases head(hagelloch_sir)
#> t S I R #> 1 0 187 1 0 #> 2 1 187 1 0 #> 3 2 187 1 0 #> 4 3 186 2 0 #> 5 4 186 2 0 #> 6 5 186 2 0
assertthat::assert_that(all(apply(hagelloch_sir[,-1], 1, sum) == 188))
#> [1] TRUE