some updates for ape 3.0-6

[ape.git] / R / rtree.R

diff --git a/R/rtree.R b/R/rtree.R
index 0df359677a0a78678e6b7b8dfe59c8a38d68a345..eb00b60c087212a8905657ac5a6aa40b3fb5618c 100644 (file)
--- a/R/rtree.R
+++ b/R/rtree.R
@@ -1,4 +1,4 @@
-## rtree.R (2012-02-09)
+## rtree.R (2012-09-14)
 
 ##   Generates Trees
 
@@ -100,6 +100,7 @@ rtree <- function(n, rooted = TRUE, tip.label = NULL, br = runif, ...)
     }
     phy$Nnode <- n - 2L + rooted
     class(phy) <- "phylo"
+    attr(phy, "order") <- "cladewise"
     phy
 }