Rでポアソン分布の適合度検定

Rでポアソン分布の適合度検定

chisq.test(as.vector(table(b)),dpois(union(min(b),b),lambda=mean(b)))

で大丈夫か?

union(min(b),b)は
与えられる数の重複する部分を切っているだけ。