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

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

Author: jarioksa
Date: 2009-04-23 14:05:00 +0200 (Thu, 23 Apr 2009)
New Revision: 812

Modified:
   pkg/vegan/R/panel.ordi.R
   pkg/vegan/inst/ChangeLog
Log:
ordixyplot etc: biplot arrows and env centres mixed x and y axes

Modified: pkg/vegan/R/panel.ordi.R
===================================================================
--- pkg/vegan/R/panel.ordi.R	2009-04-22 13:26:58 UTC (rev 811)
+++ pkg/vegan/R/panel.ordi.R	2009-04-23 12:05:00 UTC (rev 812)
@@ -4,11 +4,11 @@
     panel.xyplot(x, y, type = type,  ...)
     tp <- trellis.par.get()
     if ("biplot" %in% type && !is.null(biplot$arrows)) {
-        panel.arrows(0, 0, biplot$arrows[,1], biplot$arrows[,2],
+        panel.arrows(0, 0, biplot$arrows[,2], biplot$arrows[,1],
                      col=tp$superpose.symbol$col, ...)
     }
     if ("biplot" %in% type && !is.null(biplot$centres)) {
-        panel.xyplot(biplot$centres[,1], biplot$centres[,2],
+        panel.xyplot(biplot$centres[,2], biplot$centres[,1],
                      col = tp$plot.symbol$col, 
                      pch = "+", cex = 3*tp$plot.symbol$cex, lwd=2,
                      ...)

Modified: pkg/vegan/inst/ChangeLog
===================================================================
--- pkg/vegan/inst/ChangeLog	2009-04-22 13:26:58 UTC (rev 811)
+++ pkg/vegan/inst/ChangeLog	2009-04-23 12:05:00 UTC (rev 812)
@@ -7,7 +7,8 @@
 	* orditkplot: copes with missing or NaN scores (omits them).
 
 	* ordixyplot: failed in constrained ordination (cca, rda,
-	capscale). Was broken in rev108 on Nov 7, 2007(!). 
+	capscale). Was broken in rev108 on Nov 7, 2007(!). The biplot was
+	rotated 90 degrees: it seems that lattice calls x y and y x...
 
 	* RsquareAdj: defined as generic function. The old RsquareAdj is
 	now the "default" method, and there are specific methods for