#' @rdname moments
#' @export
stdev <- function(distribution) {
UseMethod("stdev")
}
#' @rdname moments
#' @export
stdev.dst <- function(distribution) {
ss <- variance(distribution)
sqrt(ss)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.