[Picante-commits] r219 - pkg/R

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

Author: skembel
Date: 2010-03-02 22:35:08 +0100 (Tue, 02 Mar 2010)
New Revision: 219

Modified:
   pkg/R/phylosor.R
Log:
Fix problem with phylosor expecting matrix instead of data.frame

Modified: pkg/R/phylosor.R
===================================================================
--- pkg/R/phylosor.R	2010-02-23 23:59:57 UTC (rev 218)
+++ pkg/R/phylosor.R	2010-03-02 21:35:08 UTC (rev 219)
@@ -8,6 +8,7 @@
         stop("Rooted phylogeny required for phylosor calculation")
     }
     
+    samp <- as.matrix(samp)
     s <- nrow(samp)
     phylodist <- matrix(NA, s, s)
     rownames(phylodist) <- rownames(samp)