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

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

Author: jarioksa
Date: 2015-07-15 10:28:34 +0200 (Wed, 15 Jul 2015)
New Revision: 2954

Modified:
   pkg/vegan/R/rarecurve.R
Log:
Merge branch 'cran-2.3' into r-forge-svn-local

Modified: pkg/vegan/R/rarecurve.R
===================================================================
--- pkg/vegan/R/rarecurve.R	2015-07-15 07:20:33 UTC (rev 2953)
+++ pkg/vegan/R/rarecurve.R	2015-07-15 08:28:34 UTC (rev 2954)
@@ -13,7 +13,7 @@
     tot <- rowSums(x)
     S <- specnumber(x)
     ## remove empty rows or we fail
-    if (any(S <= 1)) {
+    if (any(S <= 0)) {
         message("empty rows removed")
         x <- x[S > 0,, drop =FALSE]
         tot <- tot[S > 0]