#' @export
summary.RMD.simulation.results <-
function (object,...)
{
cat("\n\nSummary for simulation results object", deparse(substitute(object)),
"\n")
cat("Number of simulations=", nrow(object$results.matrix),
"\n")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.