data(otumothur)
test1 <- alphaDiversity(otutab = otumothur, siteInCol = TRUE,
taxhead = "taxonomy", threshold = 1, percent = FALSE, write = FALSE)
test2 <- alphaDiversity(otutab = otumothur[,-454], siteInCol = TRUE,
taxhead = NULL, threshold = 1, percent = FALSE, write = FALSE)
Run the code above in your browser using DataLab