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

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

Author: jarioksa
Date: 2012-01-05 09:31:16 +0100 (Thu, 05 Jan 2012)
New Revision: 2035

Modified:
   pkg/vegan/R/plot.cca.R
   pkg/vegan/inst/ChangeLog
Log:
plot.cca works in degenerate solutions where constraints are aliased to NULL

Modified: pkg/vegan/R/plot.cca.R
===================================================================
--- pkg/vegan/R/plot.cca.R	2011-12-21 12:14:55 UTC (rev 2034)
+++ pkg/vegan/R/plot.cca.R	2012-01-05 08:31:16 UTC (rev 2035)
@@ -81,7 +81,7 @@
         else if (type == "points") 
             points(g$constraints, pch = 2, cex = 0.7, col = "darkgreen")
     }
-    if (!is.null(g$biplot) && type != "none") {
+    if (!is.null(g$biplot) && nrow(g$biplot) > 0 && type != "none") {
         if (length(display) > 1) {
             mul <- ordiArrowMul(g$biplot)
         }

Modified: pkg/vegan/inst/ChangeLog
===================================================================
--- pkg/vegan/inst/ChangeLog	2011-12-21 12:14:55 UTC (rev 2034)
+++ pkg/vegan/inst/ChangeLog	2012-01-05 08:31:16 UTC (rev 2035)
@@ -20,6 +20,9 @@
 	* oecosimu: more informative text on 'alternative' hypotheses in
 	the printed output. Return also the mean of simulations and show
 	that in the printed output.
+
+	* plot.cca: works with degenerate solutions where constraints are
+	aliased and 'biplot' scores have zero rows.
 	
 	* rarecurve: new function to draw rarefaction curves for each
 	plot, optionally with sample size vertical and corresponding