R/bernoulliDist.R

In causact: Fast, Easy, and Visual Bayesian Inference

#' The Bernoulli Distribution
#'
#' @description
#' #' `r lifecycle::badge('stable')`
#'
#' Density, distribution function, quantile function and random generation for the benoulli distribution with parameter `prob`.
#'
#' @param n number of observations. If `length(n) > 1`, the length is taken to be the number required.
#' @param prob probability of success of each trial
#' @return A vector of 0's and 1's representing failure and success.
#' @examples
#' #Return a random result of a Bernoulli trial given `prob`.
#' rbern(n =1, prob = 0.5)
#' @importFrom stats rbinom
#' @importFrom lifecycle badge
#' @export


rbern <- function(n, prob)
  {
    rbinom(n,size=1,prob=prob)
  }