powered by
envelope.beta(model=fit.model,sim=100,conf=.90, pch="+",font.main=1, cex.main=1.5, type = c("standardized","deviance"))
betareg
summary.betareg
predict.betareg
residuals.betareg
data(pratergrouped) fit <- betareg(oil ~ batch1 + batch2 + batch3 + batch4 + batch5 + batch6 + batch7 + batch8 + batch9 + temp, data=pratergrouped) envelope.beta(fit)
Run the code above in your browser using DataLab