是否存在类似于MATLAB的tic/toc的R计时器或秒表功能?

最佳答案

正如Dirk提到的,R中有很多分析工具。如果您想要tic / toc的简单性,那么也可以在R中做到这一点。

编辑:我已经蚕食了MATLAB程序包中的垃圾收集功能,现在tic允许您选择对总经过时间还是仅对用户时间感兴趣。

tic <- function(gcFirst = TRUE, type=c("elapsed", "user.self", "sys.self"))
{
   type <- match.arg(type)
   assign(".type", type, envir=baseenv())
   if(gcFirst) gc(FALSE)
   tic <- proc.time()[type]
   assign(".tic", tic, envir=baseenv())
   invisible(tic)
}

toc <- function()
{
   type <- get(".type", envir=baseenv())
   toc <- proc.time()[type]
   tic <- get(".tic", envir=baseenv())
   print(toc - tic)
   invisible(toc)
}

用法是例如tic(); invisible(qr(matrix(runif(1e6), nrow=1e3))); toc()

关于matlab - R中的秒表功能,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/1716012/

10-12 18:20