vplot.profile.Rdvplot.profile(x, ...)
vpairs.profile(x, colours = 2:3, ...)See
profile.glm for details.
pneumo <- transform(pneumo, let = log(exposure.time))
fit1 <- vglm(cbind(normal, mild, severe) ~ let, acat,
trace = TRUE, data = pneumo)
#> Iteration 1: deviance = 5.407271
#> Iteration 2: deviance = 5.34745
#> Iteration 3: deviance = 5.347382
#> Iteration 4: deviance = 5.347382
pfit1 <- profile(fit1, trace = FALSE)
if (FALSE) { # \dontrun{
vplot.profile(pfit1)
vpairs.profile(pfit1)
} # }