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

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

Author: jarioksa
Date: 2013-03-04 10:08:01 +0100 (Mon, 04 Mar 2013)
New Revision: 2460

Modified:
   pkg/vegan/R/print.specaccum.R
Log:
print (average) effort in weighted specaccum

Modified: pkg/vegan/R/print.specaccum.R
===================================================================
--- pkg/vegan/R/print.specaccum.R	2013-03-03 16:00:30 UTC (rev 2459)
+++ pkg/vegan/R/print.specaccum.R	2013-03-04 09:08:01 UTC (rev 2460)
@@ -8,7 +8,8 @@
     }
     cat("\n")
     cat("Call:", deparse(x$call), "\n\n")
-    mat <- rbind(Sites = x$sites, Richness = x$richness, sd=x$sd)
+    mat <- rbind(Sites = x$sites, Effort = x$effort, Richness = x$richness,
+                 sd=x$sd)
     colnames(mat) <- rep("", ncol(mat))
     print(mat)
     invisible(x)