# ========================================================================
# var - variance function
# ========================================================================
#
#' Calculate the variance of an rv object
#'
#' @inheritParams stats::var
#' @rdname distrib_rv
#' @param \dots arguments passed to stats::var
#' @export
var.rv <- function(x, ...) {
simapply(x, stats::var, ...)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.