R/create.phylo.all.R

Defines functions create.phylo.all

Documented in create.phylo.all

create.phylo.all <- function(scenarios = "S3")
# Used once to generate the phylogeny of all the taxa of the database
{
  data('TreeGhatsData', package='TreeGhats', envir=environment())
  TreeGhatsData <- get("TreeGhatsData", envir=environment())
  TreeGhatsData.accept <- TreeGhatsData[(!is.na(TreeGhatsData$Status_TBGRI) | !is.na(TreeGhatsData$Status_TPL)) & ((is.na(TreeGhatsData$Status_TBGRI) & TreeGhatsData$Status_TPL=="Accepted") | TreeGhatsData$Status_TBGRI=="Accepted"),]
  TreeGhatsData.phylo <- create.phylo(TreeGhatsData.accept, scenarios = scenarios)
}
frmunoz/TreeGhats documentation built on March 24, 2018, 5:24 a.m.