Description Usage Arguments Value See Also Examples
Tree ratio test based on the tree.
1 | Tree.ratio(p, tree, taxa.index, alltab, group = c(1:N))
|
p |
the number of OTU |
tree |
the tree structure, phylo object |
taxa.index |
matrix return by Taxa.index |
alltab |
the count data matrix |
group |
the class of each sample |
A list data
alltab |
data after test by prune the tree |
taxa.pvalue |
pvalue of the internal nodes |
taxa.dif |
differential internal nodes |
otu.dif |
differential OTU before corrected |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | library(MiSPU)
data(throat.otu.tab)
data(throat.tree)
data(throat.meta)
p <- ncol(throat.otu.tab)
# throat.taxa.index <- Taxa.index(p, throat.tree)
data(throat.taxa.index )
colnames(throat.otu.tab) <- as.character(1:p)
throat.taxa.tab <- throat.otu.tab %*% throat.taxa.index
throat.alltab <- cbind(throat.taxa.tab, throat.otu.tab)
group <- throat.meta$SmokingStatus
result <- Tree.ratio(p, throat.tree, throat.taxa.index, throat.alltab, group)
throat.detected <- Tree.ratio.back(p, throat.tree, throat.taxa.index, results, group)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.