R/cumulate_distribution.R

In sams25/rcombinator_old: Tools to Simulate the Evolution of Genetic Sequences

#' Converts a probability distribution into a cumulative distribution

#' @param distribution The probability distribution of a set of outcomes
#' @return The coressponding cumulative distribution
#' @export

cumulate_distribution <- function(distribution)
{
  return(cumsum(distribution))
}