powered by
data(ulcer)
Errors in the data given in the paper have been corrected here.
data(ulcer) glm(cbind(r,m-r)~table+treat,data=ulcer,family=binomial)
Run the code above in your browser using DataLab