MaxBacteria | R Documentation |
This function calculates the mean abundance of each bacteria. Then, it creates a matrix where each row contains the abundance of one bacteria at all time points but the bacteria with maximum (or minimum or a bacteria indicated by the user) mean abundance is placed at the last row
MaxBacteria(nombresOriginal, especieOriginal, E, Tt, which.esp)
nombresOriginal |
Vector with the bacterial names at the same order than in DaTa. it must be fulfilled that lenght(nombresOriginal)==dim(DaTa)[2]-1 |
especieOriginal |
Matrix that contains at row i the bacterial taxa of bacteria i at all time points |
E |
Number of bacteria available |
Tt |
Number of bacteria available |
which.esp |
If |
Returns a list with
especie
- Matrix that contains at row i the bacterial taxa of bacteria i at all time points but the bacteria with maximum (or minimum) mean abundance (or the bacteria indicated by the user) is placed at the last row.
especiemodi
- Matrix that contains at row i the bacterial taxa of bacteria i at time points t=2,...,Tt
but the bacteria with maximum (or minimum) mean abundance (or the bacteria indicated by the user) is placed at the last row.
nombres
- Vector with the bacteria's names placed in the order in which appear in the rows of the matrices especie
and especiemodi
EE
- Row in which the bacterial with maximum (or minimum) mean abundance was (or the value of "which" if which is numerical).
EspecieMaxima
- Row in which the bacterial with maximum (or minimum) mean abundance (or the bacteria indicated by the user) is in especie
.)
#'
names1=c("Bact1","Bact2","Bact3")
set.seed(314)
esp1=t(gtools::rdirichlet(n=4, c(1,3,1)))
e1=3
t1=4
MaxBacteria(names1,esp1,e1,t1,"Max")
names3=c("Bact1","Bact2","Bact3","Bact4","Bact5")
set.seed(314)
esp3=t(gtools::rdirichlet(n=6, c(6,6,1,6,6)))
e3=5
t3=6
MaxBacteria(names3,esp3,e3,t3,"Min")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.