R/aux_mean.R

In annabardin/Workout03: Functions for Binomial Distributions

# AUX MEAN
# Private aux function aux_mean
# Description: returns mean of binomial exp.
# Input: trials (numeric value)
# Returns: mean
aux_mean <- function(trials, prob){
  return(trials*prob)
}