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

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

Author: psolymos
Date: 2008-12-08 00:02:50 +0100 (Mon, 08 Dec 2008)
New Revision: 623

Modified:
   pkg/vegan/R/print.summary.permat.R
Log:
strata display fixed


Modified: pkg/vegan/R/print.summary.permat.R
===================================================================
--- pkg/vegan/R/print.summary.permat.R	2008-12-07 19:33:18 UTC (rev 622)
+++ pkg/vegan/R/print.summary.permat.R	2008-12-07 23:02:50 UTC (rev 623)
@@ -28,7 +28,7 @@
     cat("\nMatrix fill retained:", round(100 * sum(x$fill) / n, digits), "%")
     cat("\nRow sums retained:   ", round(100 * sum(x$rowsums) / n, digits), "%")
     cat("\nColumn sums retained:", round(100 * sum(x$colsums) / n, digits), "%")
-    if (!is.null(x$restr))
+    if (!is.null(x$strsum))
         cat("\nSums within strata retained:", round(100 * sum(x$strsum) / n, digits), "%")
     cat("\n\nBray-Curtis dissimilarities among original and permuted matrices:\n")
     print(summary(x$bray))