help - "fitdistr"

jessicawang

刚刚开始接触学习R。想问一下如果用fitdistr来拟合数据，怎么检验这个数据与拟合的分布的吻合程度呢？还是我需要用别的方法?多谢各位了。[数据在附件里]

res<-fitdistr(data$Report.delay, "Poisson")

h<-hist(data$Report.delay)

xfit<-floor(seq(0, 250, 50))

yfit<-dpois(xfit,res[[1]][1])

yfit<-yfit*diff(h$mids[1:2])*length(xfit)

lines(xfit, yfit, col="blue", lwd=2)