timeMar {qreport}

timeMar

Description

Time an Expression and Report in Quarto Margin

Usage

timeMar(x)

Arguments

x

an expression to execute

Details

Function to time an expression, printing the result of base::system.time() in the right margin, and storing the result of system.time in .systime. in the global environment so tha the user can refer to it.

Value

invisibly, the result of the expression

Author(s)

Frank Harrell

See Also

hooktime()

Examples

## Not run: 
g <- function(...){}  # define a function to run slowly
result <- timeMar(g())

## End(Not run)