测试一组数据是否来自某一泊松分布

测试一组数据是否来自某一泊松分布

data <- rpois(n = 100, 20)mean <- mean(data)poisson.test(sum(data), length(data), mean)#   Exact Poisson test# # data:  sum(data) time base: length(data)# number of events = 2000, time base = 100, p-value = 1# alternative hypothesis: true event rate is not equal to  20# 95 percent confidence interval:# 19.13299 20.89617# sample estimates:# event rate #        20 

其中P值越大说明数据符合度越好,参考youtube