data(pratergrouped)
fit <- betareg(oil ~ batch1 + batch2 + batch3 + batch4 + batch5 +
batch6 + batch7 + batch8 + batch9 + temp, data=pratergrouped)
summary(fit)
new <- data.frame(x = cbind(0,1,1,0,1,0,1,1,1,201))
predict(fit)
predict(fit,new)
predict(fit,new,type="response")
Run the code above in your browser using DataLab