Would be useful to have a report on how long a single run of EpiCompare took.
You can add this inside the EpiCompare::EpiCompare function, or even within the RMD it renders (so you can print the time it took within the html output itself, somewhere at the bottom).
t1 <- Sys.time()
<lots of code or code chunks>
t2 <- Sys.time()
methods::show( difftime(t2, t1, units = "min") )
# Time difference of 0.05845327 mins
Would be useful to have a report on how long a single run of
EpiComparetook.You can add this inside the
EpiCompare::EpiComparefunction, or even within the RMD it renders (so you can print the time it took within the html output itself, somewhere at the bottom).