Create an epidemiological record of infectors and infectees with corresponding infection and recovery times

makeEpiRecord(lambda, duration = 1, NumCases = 50)

Arguments

lambda

a numeric vector specifying the time varying intensity lambda(t) which is passed to simNHP.fun to generate the non-homogeneous Poisson process.

duration

the fixed duration of infection (default is 1)

NumCases

the approximate number of infected cases (default is 50)

Value

A matrix with columns "Infectee", "Infector", "InfnTime" (infection time), "RecTime" (recovery time), "DoneFlag". Suitable for using with getLabGenealogy

See also

Author

Caroline Colijn c.colijn@imperial.ac.uk

Michelle Kendall michelle.louise.kendall@gmail.com

Examples

myepirecord <- makeEpiRecord(c(1,2,3,4), duration=2, NumCases=100)