#' Draw random samples from an object
#' @param object An object
#' @param ... further arguments passed to or from other methods.
#' @export
draw_samples = function(object, ...){
UseMethod("draw_samples")
}
#' Sample random numbers from a probability distribution
#' @param object an \code{\link{distribution}} object
#' @param ... additional arguments passed to \code{\link{get_values}}
#' @export
draw_samples.distribution = function(object, ...){
do.call(
object$r,
get_values(object, ...)
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.