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

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

Author: jarioksa
Date: 2013-11-06 14:09:51 +0100 (Wed, 06 Nov 2013)
New Revision: 2658

Modified:
   pkg/vegan/R/permutest.cca.R
Log:
define 'strata' via plots in permutations

Modified: pkg/vegan/R/permutest.cca.R
===================================================================
--- pkg/vegan/R/permutest.cca.R	2013-11-06 11:00:27 UTC (rev 2657)
+++ pkg/vegan/R/permutest.cca.R	2013-11-06 13:09:51 UTC (rev 2658)
@@ -124,7 +124,7 @@
             stop("'strata' can be used only with simple permutation or with 'how()'")
         if (!is.null(permutations$block))
             stop("'strata' cannot be applied when 'blocks' are defined in 'how()'")
-        permutations <- update(permutations, blocks = strata)
+        permutations <- update(permutations, plots = Plots(factor(strata)))
     }
     ## now permutations is either a how() structure or a permutation
     ## matrix. Make it to a matrix if it is "how"