[Vegan-commits] r1896 - pkg/vegan/R

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

Author: jarioksa
Date: 2011-09-26 17:44:56 +0200 (Mon, 26 Sep 2011)
New Revision: 1896

Modified:
   pkg/vegan/R/oecosimu.R
Log:
correct 'nsimul' when input data are a 'simmat' array

Modified: pkg/vegan/R/oecosimu.R
===================================================================
--- pkg/vegan/R/oecosimu.R	2011-09-26 12:57:32 UTC (rev 1895)
+++ pkg/vegan/R/oecosimu.R	2011-09-26 15:44:56 UTC (rev 1896)
@@ -19,6 +19,7 @@
         x <- comm
         comm <- attr(comm, "data")
         method <- attr(x, "method")
+        nsimul <- dim(x)[3]
         simmat_in <- TRUE
     } else {
         simmat_in <- FALSE