data(pratergrouped)
fit1 <- betareg(oil ~ batch1 + batch2 + batch3 + batch4 + batch5 +
batch6 + batch7 + batch8 + batch9 + temp, data=pratergrouped)
fit2 <- betareg(oil ~ batch1 + batch2 + batch3 + batch4 + batch5 + batch6 +
batch7 + batch8 + batch9 + temp, link = "probit", data=pratergrouped)
summary(fit1)
par(mfrow=c(2,2))
plot(fit1)
Run the code above in your browser using DataLab