powered by
data(cloth)
data(cloth) attach(cloth) plot(x,y) # Comparison of Poisson and quasilikelihood fits summary(glm(y~x-1,family=poisson(identity))) summary(glm(y~x-1,family=quasipoisson(identity)))
Run the code above in your browser using DataLab