R/timer.R

Defines functions timer

Documented in timer

timer <- function(start.time) {
  duration <- difftime(Sys.time(), start.time, units = "auto")
  units <- attr(duration, "units")
  duration <- round(abs(as.numeric(duration)), 1)
  message("It took ", duration, " ", units, ".")
  invisible(paste(duration, units))
}

Try the fuzzySim package in your browser

Any scripts or data that you put into this service are public.

fuzzySim documentation built on Oct. 9, 2023, 5:09 p.m.