Returns and (optionally) prints the total and/or partial (since the last call to this function) real and CPU times.

cpu.time(..., reset = FALSE, total = TRUE, last = TRUE, flush = FALSE)

Arguments

...

objects (describing the last operation) to be printed (using cat), if last == TRUE.

reset

logical; if TRUE, time counters are initialized.

total

logical; if TRUE, the total time used is printed.

last

logical; if TRUE, the partial time used is printed.

flush

logical; if TRUE, flush.console is called.

Value

Invisibly returns a list with the following 3 components (objects of class "proc_time"):

time

user, system, and total elapsed times for the currently running R process (result of a call to proc.time).

last, total

differences between the corresponding proc.time calls.

Examples

cpu.time(reset=TRUE)
#> CPU time has been initialized.
res <- median(runif(100000))
cpu.time('\nSample median of', 100000, 'values =', res)
#> Time of last operation: 
#> Sample median of 1e+05 values = 0.4999939 
#>    user  system elapsed 
#>       0       0       0 
#> Total time:
#>    user  system elapsed 
#>       0       0       0 
res <- median(runif(1000))
cpu.time('\nSample median of', 1000, 'values =', res)
#> Time of last operation: 
#> Sample median of 1000 values = 0.4815052 
#>    user  system elapsed 
#>       0       0       0 
#> Total time:
#>    user  system elapsed 
#>       0       0       0