data(ITS1, meta)
# otuIDs
otuIDs=rownames(ITS1)[1:10]
# names(meta)
theme <- RAM.color()
group.OTU(otu=ITS1, rank="g", otuIDs=otuIDs,
meta=meta, meta.factor="City", boxplot=TRUE,
file=NULL, ext=NULL) + theme
## Not run:
# group.OTU(otu=ITS1, rank="g", otuIDs=otuIDs,
# meta=meta, meta.factor="City", boxplot=FALSE,
# file=NULL) + theme
# ## End(Not run)
Run the code above in your browser using DataLab