R/z_tree.R

In lijing28101/fagin2: Annotate Orphan Genes

#' Get all species in the study
#'
#' @param con configuration
#' @export
#' @return vector of all species
get_species <- function(con){
  ape::read.tree(con@input@tree)$tip.label %>%
    gsub(pattern=" ", replacement="_")
}