Nothing
## File Name: immer_summary_print_computation_time.R
## File Version: 0.03
immer_summary_print_computation_time <- function( object )
{
t1 <- object$time$start
t2 <- object$time$end
cat( "Date of Analysis:", "\n" )
cat( " Start:", paste( t1 ), "\n" )
cat( " End :", paste( t2 ), "\n" )
cat("Computation time:", print( t2 - t1 ), "\n\n")
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.