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

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

Author: jarioksa
Date: 2012-09-04 06:41:47 +0200 (Tue, 04 Sep 2012)
New Revision: 2269

Modified:
   pkg/vegan/R/mantel.R
   pkg/vegan/R/mantel.partial.R
Log:
use <-

Modified: pkg/vegan/R/mantel.R
===================================================================
--- pkg/vegan/R/mantel.R	2012-09-04 04:25:12 UTC (rev 2268)
+++ pkg/vegan/R/mantel.R	2012-09-04 04:41:47 UTC (rev 2269)
@@ -8,7 +8,7 @@
     if (na.rm)
         use <- "complete.obs"
     else
-        use = "all.obs"
+        use <- "all.obs"
     statistic <- cor(as.vector(xdis), ydis, method = method, use = use)
     variant <- match.arg(method, eval(formals(cor)$method))
     variant <- switch(variant,

Modified: pkg/vegan/R/mantel.partial.R
===================================================================
--- pkg/vegan/R/mantel.partial.R	2012-09-04 04:25:12 UTC (rev 2268)
+++ pkg/vegan/R/mantel.partial.R	2012-09-04 04:41:47 UTC (rev 2269)
@@ -12,7 +12,7 @@
     if (na.rm)
         use <- "complete.obs"
     else
-        use = "all.obs"
+        use <- "all.obs"
     rxy <- cor(as.vector(xdis), ydis, method = method, use = use)
     rxz <- cor(as.vector(xdis), zdis, method = method, use = use)
     ryz <- cor(ydis, zdis, method = method, use = use)