powered by
sec
delayt(sec) # wait for sec seconds nrof <- delayt(sec) # save the number of internal calls of Sys.time(). Can be used to compare the relative execution speed of different processors.
Sys.time(); nrof <- delayt(5); Sys.time() print(nrof) # 2620 on my machine
Run the code above in your browser using DataLab