在R中存储tic toc值

Question

我正在寻找一种在R中的变量中存储运行时间的方法.在MATLAB中,我们可以做一些事情:

抽动;
......
x = toc;

然后将运行时间存储在变量x中.我尝试使用来自MATLAB包的R中的tic()toc()函数做同样的事情但没有成功.此外,我无法看到如何使用R的system.time()函数来完成此操作.这里的任何帮助非常感谢.

Answer 1

使用内置system.time功能:

tm1 <- system.time(
{
  #your code here
})

或者,包装的benchmark功能rbenchmark:

tm2 <- benchmark(
{
  #your code here
}, replications=1)

Answer 2

更多类似tic和toc有时更加得心应手例如,用于循环状态消息:

start <- Sys.time ()
do.something ()
Sys.time () - start

Answer 3

或者您可以按照“tictoc”包中的描述进行操作。

tic("timer")
1+1
toc(log = TRUE, quiet = TRUE)
log.txt <- tic.log(format = TRUE)
tic.clearlog()

然后，您的输出将存储在 log.txt 中。如果您只需要以秒为单位的时间，则可以unlist(log.txt)将其作为字符串进行分析。

干杯，