## best fit for groups 'Lean' and 'Obese'; full example in vignette.
## Not run: bestgrp <- dmngroup(count, pheno, k=1:5, verbose=TRUE,
# mc.preschedule=FALSE)
# ## End(Not run)
data(bestgrp)
bestgrp
bestgrp[["Obese"]]
Run the code above in your browser using DataLab