Description Usage Arguments Value Examples
This function esitmates ancestral expression profile and related statistical uncertainty
1 |
x |
a vector of known expression profile, preferably log-transformed expression levels (e.g. log RPKM) |
phy |
an unrooted phylogenetic tree in the form of class "phylo" |
mat |
a matrix generated from "varMatInv" function |
CI |
a logical specifying whether to return the 95 intervals of the estimated ancestral expression levels |
returns a list containing estimated ancestral expression profile as well as other requested parameters
1 2 3 4 5 6 7 8 9 10 11 12 13 | library('ape')
data('tetraExp')
dismat <- expdist(tetraExp, taxa = "all", subtaxa = "Brain", method = "sou")
exp_tree <- NJ(dismat)
exp_tree <- no0br(exp_tree)
var_mat <- varMatInv(objects = tetraExp,phy = exp_tree,taxa = "all",
subtaxa = "Brain")
exp_table <- exptabTE(tetraExp, taxa = "all", subtaxa = "Brain")
exp_one <- aee(exp_table[1,], exp_tree, var_mat)
exp_tree$node.label <- exp_one$est
exp_tree <- root(exp_tree, outgroup = "Chicken_Brain",
resolve.root = TRUE)
plot(exp_tree,show.node.label = TRUE)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.