R/visualize.binom.R

In visualize: Graph Probability Distributions with User Supplied Parameters and Statistics

#' Visualize Binomial Distribution
#' 
#' Generates a plot of the Binomial distribution with user specified
#' parameters.
#' 
#' 
#' @param stat a statistic to obtain the probability from. When using the
#' "bounded" condition, you must supply the parameter as `stat =
#' c(lower_bound, upper_bound)`. Otherwise, a simple `stat =
#' desired_point` will suffice.
#' @param size size of sample.
#' @param prob probability of picking object.
#' @param section Select how you want the statistic(s) evaluated via
#' `section=` either `"lower"`,`"bounded"`, `"upper"`,
#' or`"tails"`.
#' @param strict Determines whether the probability will be generated as a
#' strict (<, >) or equal to (<=, >=) inequality. `strict=` requires
#' either values = 0 or =FALSE for equal to OR values =1 or =TRUE for strict.
#' For bounded condition use: `strict=c(0,1)` or
#' `strict=c(FALSE,TRUE)`.
#' @author James Balamuta
#' @export
#' @seealso [visualize.it()] , [dbinom()].
#' @keywords visualize
#' @examples
#' 
#' # Evaluates lower tail with equal to inequality.
#' visualize.binom(stat = 1, size = 3, prob = 0.5, section = "lower", strict = FALSE) 
#' 
#' # Evaluates bounded region with lower bound equal to and upper bound strict inequality.
#' visualize.binom(stat = c(1,2), size = 5, prob = 0.35, section = "bounded", strict = c(0,1))
#' 
#' # Evaluates upper tail with strict inequality.
#' visualize.binom(stat = 1, size = 3, prob = 0.5, section = "upper", strict = TRUE)
#' 
visualize.binom <-
function(stat = 1, size = 3, prob = .5, section = "lower", strict = FALSE) {
  visualize.it('binom', stat = stat, list(size = size, prob = prob), section = section, strict=strict)
}