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

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

Author: jarioksa
Date: 2013-03-04 18:11:23 +0100 (Mon, 04 Mar 2013)
New Revision: 2464

Modified:
   pkg/vegan/R/print.specaccum.R
Log:
print if specaccum() was weighted

Modified: pkg/vegan/R/print.specaccum.R
===================================================================
--- pkg/vegan/R/print.specaccum.R	2013-03-04 17:05:14 UTC (rev 2463)
+++ pkg/vegan/R/print.specaccum.R	2013-03-04 17:11:23 UTC (rev 2464)
@@ -6,6 +6,8 @@
     if (x$method == "random") {
         cat(", with ", ncol(x$perm), " permutations", sep="")
     }
+    if (!is.null(x$weights))
+        cat(", weighted")
     cat("\n")
     cat("Call:", deparse(x$call), "\n\n")
     mat <- rbind(Sites = x$sites, Individuals = x$individuals, Effort = x$effort,