Calculates the percentage probability that one or more persons in a group, of a particular size g, may be infectious given the underlying prevalence of disease.
calcRisk(p_I, g)Probability one individual in a population is infectious.
Event size.
The risk (%) one or more individuals at an event of size g will be infectious.
risk <- calcRisk(.001, 50)