data(ITS1, ITS2, meta)
taxa <- c("Fusarium", "Alternaria", "Cladosporium")
group.Taxa.box(data=list(ITS1=ITS1, ITS2=ITS2), is.OTU=TRUE, rank="g",
taxa=taxa, meta=meta, meta.factor="City")
taxa.1 <- c("Fusarium", "Alternaria", "Cladosporium", "Verticillium",
"Kondoa")
group.Taxa.box(data=list(ITS1=ITS1, ITS2=ITS2), is.OTU=TRUE, rank="g",
taxa=taxa.1, meta=meta, meta.factor="City")Run the code above in your browser using DataLab