Eu sei que existe o Rprof(), mas ele me parece bastante impreciso comparado ao microbenchmark(). Contudo, se quero usar o microbenchmark() eu tenho que chamar a função 2 vezes, uma para ter a saída dela e outra para executar o tempo dela (o que me parece bastante inviável)
A função não é essa, mas segue um exemplo do meu problema: teste <- function(x){
Rprof() x <- x+2 Rprof(NULL)
return(summaryRprof()) } guarda_x_e_tempo <- teste(2)
ou
teste <- function(x){ x <- x+2 return(x) } guarda_x <- teste(2) guarda_tempo <- teste(2)