This function computes the partial TAI
or TDI
values for all Phylostrata or Divergence Strata.
Arguments
- ExpressionSet
a standard PhyloExpressionSet or DivergenceExpressionSet object.
Examples
data(PhyloExpressionSetExample)
# compute partial TAI values for each Phylostratum
partialStrata <- pStrata(PhyloExpressionSetExample)
# show that colSums of pStrata is equavalent to the TAI values
all.equal(colSums(partialStrata),TAI(PhyloExpressionSetExample))
#> [1] TRUE
# show that colSums of pStrata is equavalent to colSums of pMatrix(PhyloExpressionSetExample)
all.equal(colSums(partialStrata),colSums(pMatrix(PhyloExpressionSetExample)))
#> [1] TRUE