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

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

Author: jarioksa
Date: 2013-09-27 14:17:04 +0200 (Fri, 27 Sep 2013)
New Revision: 2627

Modified:
   pkg/vegan/R/print.cca.R
Log:
zap almost-zero components in the print of cca/rda/capscale

Modified: pkg/vegan/R/print.cca.R
===================================================================
--- pkg/vegan/R/print.cca.R	2013-09-26 10:27:31 UTC (rev 2626)
+++ pkg/vegan/R/print.cca.R	2013-09-27 12:17:04 UTC (rev 2627)
@@ -27,7 +27,7 @@
     ## Remove "Proportion" if only one component
     if (is.null(x$CCA) && is.null(x$pCCA))
         tbl <- tbl[,-2]
-    printCoefmat(tbl, digits = digits, na.print = "")
+    printCoefmat(tbl, digits = digits, na.print = "", zap.ind = 1:2)
     cat("Inertia is", x$inertia, "\n")
     if (!is.null(x$CCA$alias))
         cat("Some constraints were aliased because they were collinear (redundant)\n")