#' Make an incompleted tree completed
#' @param allLin incompleted all lineages.
#' @return completed all lineages.
#' @export
#'
Make.tree.complete <- function(allLin) {
allLin <- c(allLin,Find.addNode(allLin))
return(allLin)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.