Last chance! 50% off unlimited learning
Sale ends in
data(chest.nz)
fit <- vgam(cbind(nolnor, nolr, lnor, lr) ~ s(age, c(4, 3)),
binom2.or(exchan = TRUE, zero = NULL), data = chest.nz)
coef(fit, matrix = TRUE)
plot(fit, which.cf = 2, se = TRUE)
Run the code above in your browser using DataLab