Skip to content

Commit

Permalink
update the test code and expected output so that we switch back to se…
Browse files Browse the repository at this point in the history
…quential tests as that was what was being tested prior to changes in #677

(cherry picked from commit 51daf9f)
  • Loading branch information
gavinsimpson committed Aug 16, 2024
1 parent 5cfa888 commit 341d3e0
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions tests/vegan-tests.R
Original file line number Diff line number Diff line change
Expand Up @@ -42,7 +42,7 @@ anova(m, by="term", permutations=99) # failed before 2.5-0
anova(m, by="margin", permutations=99) # works since 2.5-0
anova(m, by="axis", permutations=99)
## adonis
adonis2(fla, data = dune.env)
adonis2(fla, data = dune.env, by = "terms")
## capscale
p <- capscale(fla, data=df, na.action=na.exclude, subset = Use != "Pasture" & spno > 7)
anova(p, permutations=99)
Expand Down Expand Up @@ -80,10 +80,10 @@ foo("capscale", dune, Management, na.action = na.omit) # fails in 2.2-1
## adonis must be done with detached 'df' or it will be used instead
## of with(dune.env, ...)
detach(df)
with(dune.env, foo("adonis2", dune, Management))
with(dune.env, foo("adonis2", dune, Management, by = "terms"))
## the test case reported in github issue #285 by @ktmbiome
var <- "Moisture"
adonis2(dune ~ dune.env[, var])
adonis2(dune ~ dune.env[, var], by = "terms")
rm(var)
###

Expand Down

0 comments on commit 341d3e0

Please sign in to comment.