[Phylobase-commits] r176 - pkg/R

[noreply at r-forge.r-project.org]

Author: bbolker
Date: 2008-05-21 21:27:44 +0200 (Wed, 21 May 2008)
New Revision: 176

Modified:
   pkg/R/setAs-Methods.R
Log:
 fixed trivial typo in a comment (!)



Modified: pkg/R/setAs-Methods.R
===================================================================
--- pkg/R/setAs-Methods.R	2008-05-08 11:45:30 UTC (rev 175)
+++ pkg/R/setAs-Methods.R	2008-05-21 19:27:44 UTC (rev 176)
@@ -96,7 +96,7 @@
     ## node <- c(root, node) # doesn't fit the ordering: root, other internal nodes, tips
     node <- c(int.node, tip)
     ## retrieve the ancestor of each node
-    idx <- match(node, E[, 2]) # new ordering of the descendents/edges
+    idx <- match(node, E[, 2]) # new ordering of the descendants/edges
     ## if (length(ancestor)>0) ancestor <- c(NA, ancestor)
     ancestor <- E[idx, 1]
     ## branch.length <- c(x at root.edge, x at edge.length) # root.edge is not an edge length