This PR initially started off as extending the current functionality we offer to specify the initial conditions from just the number initially in the E state to requiring manual specification of the number of individuals in each of the disease states (i.e. S, E, I and R).
I also spotted a small bug in the way we had specified the draws from the gamma distribution for the duration of the latent, infectious and immunity loss periods. I had got the shape and rate arguments muddled up. It doesn't change the mean of the distribution, but previously the variance was very low (too low).
par(mfrow = c(2, 1))
hist(rgamma(10000, 2 * 365, 2), breaks = 50) ## this is what we had before
hist(rgamma(n = 10000, shape = 2, rate = 2/365), breaks = 50) ### this is what we do now
This PR initially started off as extending the current functionality we offer to specify the initial conditions from just the number initially in the E state to requiring manual specification of the number of individuals in each of the disease states (i.e. S, E, I and R).
I also spotted a small bug in the way we had specified the draws from the gamma distribution for the duration of the latent, infectious and immunity loss periods. I had got the shape and rate arguments muddled up. It doesn't change the mean of the distribution, but previously the variance was very low (too low).