## locate directory with data
dirPath <- system.file("extdata/Sogin_2006", package="OTUbase")
## read in data into TAXset object
soginTAX <- readTAXset(dirPath=dirPath, samplefile="sogin.groups", fastafile="sogin.fasta", taxfile="sogin.unique.fix.tax",namefile="sogin.names", sampleADF="sample_metadata.txt")
## get subset of soginTAX
subTAXset(soginTAX, samples=getSamples(soginTAX, colnum="Site", value="Labrador", exact=FALSE))
Run the code above in your browser using DataLab