R/progress.time.R

Defines functions progress.time

Documented in progress.time

progress.time <-
function# returns the time taken since the time started
### internal function for sisus
(time.start
### internal variable
)
{
  ##details<<
  ## interal function for sisus.run()

  time.sofar = proc.time()[3] - time.start;   # calculate time elapsed
  return(time.sofar);
  ### internal variable
}

Try the sisus package in your browser

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

sisus documentation built on May 30, 2017, 12:23 a.m.