Never been to DZone Snippets before?

Snippets is a public source code repository. Easily build up your personal collection of code snippets, categorize them with tags / keywords, and share them with the world

Zero-inflated negative binomial (See related posts)

// Simulates a zero-inflated, negative binomial
// from Ben Bolker

rzinbinom <- function(n, mu, size, zprob) {
  ifelse(runif(n) < zprob, 0, rnbinom(n, mu=mu, size=size))
}

You need to create an account or log in to post comments to this site.


Click here to browse all 4881 code snippets

Related Posts