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

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

Author: jarioksa
Date: 2012-06-01 10:14:05 +0200 (Fri, 01 Jun 2012)
New Revision: 2207

Modified:
   pkg/vegan/R/predict.cca.R
Log:
tweak warning in predict.cca

Modified: pkg/vegan/R/predict.cca.R
===================================================================
--- pkg/vegan/R/predict.cca.R	2012-06-01 08:01:34 UTC (rev 2206)
+++ pkg/vegan/R/predict.cca.R	2012-06-01 08:14:05 UTC (rev 2207)
@@ -27,7 +27,7 @@
                 u <- predict(object, type = if(model == "CCA") "lc" else "wa",
                              newdata = newdata, rank = take)
             else
-                warning(gettextf("'newdata' must have the same number of rows as the original community data with type = '%s' -- 'newdata' ignored", type))
+                warning(gettextf("'newdata' ignored: it must have the same number of rows as the original community data with type = '%s'", type))
         }
         if (take > 0) 
             Xbar <- u %*% slam %*% t(v)