From 581ceb0b3b8558629535f2f9bf16fdc7bafe7fb5 Mon Sep 17 00:00:00 2001 From: paradis Date: Thu, 10 Apr 2008 18:30:02 +0000 Subject: [PATCH] removed the print(node.labels) git-svn-id: https://svn.mpl.ird.fr/ape/dev/ape@24 6e262413-ae40-0410-9e79-b911bd7a66b7 --- Changes | 3 ++- R/multi2di.R | 4 +--- 2 files changed, 3 insertions(+), 4 deletions(-) diff --git a/Changes b/Changes index 729a253..19e350a 100644 --- a/Changes +++ b/Changes @@ -9,7 +9,8 @@ BUG FIXES o The x/y aspect of the plot is now respected when plotting a circular tree (type = "r" or "f"). - o Drawing the tip labels sometimes when plotting circular trees. + o Drawing the tip labels sometimes failed when plotting circular + trees. OTHER CHANGES diff --git a/R/multi2di.R b/R/multi2di.R index 731f328..5099fd1 100644 --- a/R/multi2di.R +++ b/R/multi2di.R @@ -1,4 +1,4 @@ -## multi2di.R (2008-03-17) +## multi2di.R (2008-04-09) ## Collapse and Resolve Multichotomies @@ -63,11 +63,9 @@ multi2di <- function(phy, random = TRUE) if (wbl) phy$edge.length <- c(phy$edge.length[-edge2delete], new.edge.length) if (!is.null(attr(phy, "order"))) attr(phy, "order") <- NULL - print(phy$node.label) if (!is.null(phy$node.label)) phy$node.label <- c(phy$node.label, rep("", phy$Nnode - length(phy$node.label))) - print(phy$node.label) reorder(phy) ##read.tree(text = write.tree(phy)) } -- 2.39.5