R/poisson.sim.R

Defines functions poisson.sim

Documented in poisson.sim

poisson.sim<-function(data, mle=NULL)
{
	if(is.null(mle))
		data$Observed<-rpois(length(data$Observed), lambda=data$Expected)
	else
		data$Observed<-rpois(n=mle$n, lambda=mle$lambda)
	return(data)
}

Try the DCluster package in your browser

Any scripts or data that you put into this service are public.

DCluster documentation built on Sept. 3, 2023, 5:07 p.m.