Return to Snippet

Revision: 16366
at August 1, 2009 20:05 by fonnesbeck


Initial Code
rtpois <- function(N, lambda, k) 
	qpois(runif(N, ppois(k, lambda), 1), lambda)

Initial URL


Initial Description
Generates truncated Poisson random numbers.

Initial Title
Truncated Poisson Random Variate Generator

Initial Tags


Initial Language
R