data(orob2)
fm1 <- betabin(cbind(y, n - y) ~ seed, ~ 1, data = orob2)
# show objects of class "glimML"
fm1
# summary for objects of class "glimML"
res <- summary(fm1)
res@Coef
# show objects of class "summary.glimML"
res
Run the code above in your browser using DataLab