# AUX VARIANCE
# Private aux function aux_variance
# Description: returns variance of binomial exp.
# Input: prob (numeric value)
# Returns: variance
aux_variance <- function(trials, prob){
return((trials*prob*(1-prob)))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.