data("GasolineYield", package = "betareg")
## regression with phi as full model parameter
gy1 <- betareg(yield ~ batch + temp, data = GasolineYield)
gy1
## regression with phi as nuisance parameter
gy2 <- betareg(yield ~ batch + temp, data = GasolineYield, phi = FALSE)
gy2
## compare reported output
coef(gy1)
coef(gy2)
summary(gy1)
summary(gy2)Run the code above in your browser using DataLab