stricter sratmax in monoMDS per wish of issue #354

(cherry picked from commit ec654ba)
vegandevs · Nov 11, 2020 · 7f2f09c · 7f2f09c
1 parent 6da6b53
commit 7f2f09c
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/R/monoMDS.R b/R/monoMDS.R
@@ -3,7 +3,7 @@
              model = c("global", "local", "linear", "hybrid"),
              threshold = 0.8, maxit = 200, weakties = TRUE, stress = 1,
              scaling = TRUE, pc = TRUE, smin = 1e-4, sfgrmin = 1e-7,
-             sratmax=0.99999, ...)
+             sratmax=0.9999999, ...)
 {
     ## Check that 'dist' are distances or a symmetric square matrix
     if (!(inherits(dist, "dist") ||

diff --git a/man/monoMDS.Rd b/man/monoMDS.Rd
@@ -19,7 +19,7 @@
 monoMDS(dist, y, k = 2, model = c("global", "local", "linear", "hybrid"),
     threshold = 0.8, maxit = 200, weakties = TRUE, stress = 1,
     scaling = TRUE, pc = TRUE, smin = 1e-4, sfgrmin = 1e-7,
-    sratmax=0.99999, ...)
+    sratmax=0.9999999, ...)
 \method{scores}{monoMDS}(x, choices = NA, ...)
 \method{plot}{monoMDS}(x, choices = c(1,2), type = "t", ...)
 \method{points}{monoMDS}(x, choices = c(1,2), select, ...)