Displaying 1 result from an estimated 1 matches for "adeqel".
Did you mean:
adeel
2002 Jan 02
0
comparative rendering of modeling outputs
...> data(stackloss)
cremo> attach(stackloss)
cremo> glm2 <- glm(stack.loss ~ Air.Flow + Water.Temp + Acid.Conc.)
cremo> glm3 <- glm(stack.loss ~ Air.Flow + Water.Temp)
cremo> glm4 <- glm(stack.loss ~ Air.Flow * Water.Temp)
cremo> try(print(cremo(list(glm2, glm3, glm4), adeqel = c("deviance",
"aic")), quote = F))
var Model 1 Model 2 Model 3
[1,] (Intercept) -39.92 -50.359 22.29
[2,] (11.896) (5.138) (35.096)
[3,] Air.Flow 0.716 0.671 -0.516
[4,] (0....