# NOT RUN {
library(SMITIDvisu)
data(hostline)
tl <- timeLine(hostline,
title="Example host 113",
color=list("infected"="red","offspring"="green",
"alive"="blue","inf"="orange",
"dead"="black","Obs"="purple"))
# }
# NOT RUN {
## export as standalone html file
htmlwidgets::saveWidget(tl, "timeline.html")
browseURL("timeline.html")
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab