# NOT RUN {
## Requires prior installation of suggested package gbm to run
mf <- ModelFrame(ncases / (ncases + ncontrols) ~ agegp + tobgp + alcgp,
data = esoph, weights = with(esoph, ncases + ncontrols))
gbm_fit <- fit(mf, model = GBMModel)
varimp(gbm_fit)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab