[Adephylo-commits] r58 - in pkg: . R

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

Author: jombart
Date: 2008-11-28 12:44:27 +0100 (Fri, 28 Nov 2008)
New Revision: 58

Modified:
   pkg/R/utils.R
   pkg/TODO
Log:
Fix: do not use rootNode in sp.tips, since it works only for rooted tree.


Modified: pkg/R/utils.R
===================================================================
--- pkg/R/utils.R	2008-11-28 11:27:57 UTC (rev 57)
+++ pkg/R/utils.R	2008-11-28 11:44:27 UTC (rev 58)
@@ -68,8 +68,8 @@
 
 
     ## some global variables
-    root <- rootNode(x)
     N <- nTips(x)
+    root <- getnodes(x, N+1)
     E <- x at edge
     allTips <- unique(c(t1,t2))
 

Modified: pkg/TODO
===================================================================
--- pkg/TODO	2008-11-28 11:27:57 UTC (rev 57)
+++ pkg/TODO	2008-11-28 11:44:27 UTC (rev 58)
@@ -51,10 +51,10 @@
 - lizards.Rd -- done
 - maples.Rd -- done
 - mjrochet.Rd -- done
-- palm.Rd
+- palm.Rd -- done
 - procella.Rd
 - tithonia.Rd -- done
-* add a Moran's index and a test
+* add a Moran's index and a test (is it needed, as we have morangeary ?)