[Vegan-commits] r1042 - in pkg/vegan: R inst

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

Author: jarioksa
Date: 2009-10-12 22:17:56 +0200 (Mon, 12 Oct 2009)
New Revision: 1042

Modified:
   pkg/vegan/R/envfit.default.R
   pkg/vegan/inst/ChangeLog
Log:
na.action could drop dimensions in envfit

Modified: pkg/vegan/R/envfit.default.R
===================================================================
--- pkg/vegan/R/envfit.default.R	2009-10-12 09:12:34 UTC (rev 1041)
+++ pkg/vegan/R/envfit.default.R	2009-10-12 20:17:56 UTC (rev 1042)
@@ -12,8 +12,8 @@
     if (any(!keep)) {
         if (!na.rm)
             stop("missing values in data: consider na.rm = TRUE")
-        X <- X[keep,]
-        env <- env[keep,]
+        X <- X[keep,, drop=FALSE]
+        env <- env[keep,, drop=FALSE]
         na.action <- structure(seq_along(keep)[!keep], class="omit")
     }
     if (is.data.frame(env)) {

Modified: pkg/vegan/inst/ChangeLog
===================================================================
--- pkg/vegan/inst/ChangeLog	2009-10-12 09:12:34 UTC (rev 1041)
+++ pkg/vegan/inst/ChangeLog	2009-10-12 20:17:56 UTC (rev 1042)
@@ -4,6 +4,9 @@
 
 Version 1.16-31 (opened October 3, 2009)
 
+	* envfit: could drop data frame to a vector with na.action (broken
+	in 1.16-28).
+
 	* model.frame.cca, model.matrix.cca: new support functions to
 	reconstitute the model frame and model matrix (or  a list of
 	condition and constrain model matrices) from a cca/rda/capscale