[Vegan-commits] r2343 - pkg/vegan/tests
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Wed Jan 2 11:27:55 CET 2013
Author: jarioksa
Date: 2013-01-02 11:27:55 +0100 (Wed, 02 Jan 2013)
New Revision: 2343
Modified:
pkg/vegan/tests/vegan-tests.Rout.save
Log:
update (for r2342)
Modified: pkg/vegan/tests/vegan-tests.Rout.save
===================================================================
--- pkg/vegan/tests/vegan-tests.Rout.save 2012-12-31 19:06:36 UTC (rev 2342)
+++ pkg/vegan/tests/vegan-tests.Rout.save 2013-01-02 10:27:55 UTC (rev 2343)
@@ -1,5 +1,5 @@
-R version 2.15.1 (2012-06-22) -- "Roasted Marshmallows"
+R version 2.15.2 (2012-10-26) -- "Trick or Treat"
Copyright (C) 2012 The R Foundation for Statistical Computing
ISBN 3-900051-07-0
Platform: x86_64-apple-darwin9.8.0/x86_64 (64-bit)
@@ -485,6 +485,31 @@
> rm(x, m, m1, nodfq, nodf1)
> ### end nestednodf
>
+> ### envfit & plot.envfit: latter failed if na.action resulted in only
+> ### observation with a given factor level was removed. plot.envfit would
+> ### fail with error about too long subscript
+> ### fixed case where data presented to envfit also has extraneous levels
+> data(dune)
+> data(dune.env)
+> ## add a new level to one of the factors
+> levels(dune.env$Management) <- c(levels(dune.env$Management), "foo")
+> ## fit nMDS and envfit
+> set.seed(1)
+> mod <- metaMDS(dune)
+Run 0 stress 0.1192678
+Run 1 stress 0.1808913
+Run 2 stress 0.1808915
+Run 3 stress 0.1808911
+Run 4 stress 0.2035424
+Run 5 stress 0.119268
+... procrustes: rmse 0.0002214386 max resid 0.0006802088
+*** Solution reached
+> ef <- envfit(mod, dune.env, permutations = 99)
+> plot(mod)
+> plot(ef, p.max = 0.1)
+> rm(mod, ef)
+> ### end envfit & plot.envfit
+>
> proc.time()
user system elapsed
- 8.594 0.128 8.695
+ 9.214 0.150 9.408
More information about the Vegan-commits
mailing list