Create a labelled genealogy from an epidemiological record
getLabGenealogy(epirecord, epsilon = 0.001234)
an epidemiological record, as output from the function makeEpiRecord
. It must be a matrix of at least two rows and with five columns named "Infectee", "Infector", "InfnTime", "RecTime", "DoneFlag".
an optional small number to be used for branch lengths which would otherwise be zero.
An object of class phylo
representing the transmission tree from infectors to infectees.
## Generate an epidemiological record:
myepirecord <- makeEpiRecord(c(1,2,3,4))
## make the corresponding genealogy from this record:
mygenealogy <- getLabGenealogy(myepirecord)
plot(mygenealogy)