new_bootstrap_MET <- function(estimator, test, result, distribution) {
bootstrap_MET_object <- list(
estimator = estimator,
test = test,
results = result,
distribution = distribution
)
class(bootstrap_MET_object) <- "bmbstats_MET"
return(bootstrap_MET_object)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.