R/fit_dist_pois.R

Defines functions fit_dist_pois

Documented in fit_dist_pois

library(MASS)
fit_dist_pois <-
function(dist){
l<-length(dist)
fit_pois<-fitdistr(dist, "poisson")
data_pois<-rpois(l, fit_pois$estimate)
chi_pois<-chisq.test(dist,data_pois)
list(data_pois = data_pois, fit_pois = fit_pois, chi_pois = chi_pois)
}

Try the ABCp2 package in your browser

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

ABCp2 documentation built on May 1, 2019, 6:31 p.m.