[Picante-commits] r116 - branches/gsoc/R

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

Author: mrhelmus
Date: 2008-06-22 08:20:11 +0200 (Sun, 22 Jun 2008)
New Revision: 116

Modified:
   branches/gsoc/R/phylodiversity.R
Log:
Added a line to pse to make samp a "matrix"

Modified: branches/gsoc/R/phylodiversity.R
===================================================================
--- branches/gsoc/R/phylodiversity.R	2008-06-21 05:30:58 UTC (rev 115)
+++ branches/gsoc/R/phylodiversity.R	2008-06-22 06:20:11 UTC (rev 116)
@@ -256,6 +256,8 @@
     flag=2
   }
 
+  samp<-as.matrix(samp)
+  
   if(is(tree)[1]=="phylo")
   {
     tree<-prune.sample(samp,tree)