Running 'cca-object-tests.R' [2s]
  Comparing 'cca-object-tests.Rout' to 'cca-object-tests.Rout.save' ... OK
  Running 'oecosimu-tests.R' [2s]
  Comparing 'oecosimu-tests.Rout' to 'oecosimu-tests.Rout.save' ... OK
  Running 'vegan-tests.R' [2s]
Running the tests in 'tests/vegan-tests.R' failed.
Complete output:
  > ### vegan-tests: unit tests for vegan functions
  > 
  > ### This file contains unit tests for vegan functions. This file is
  > ### run in R CMD check and its results are compared against previously
  > ### saved results in vegan-tests.Rout.save. If you change tests, you
  > ### must generate new vegan-tests.Rout.save in this directory.
  > 
  > ### The current plan is that tests/ are not included in the CRAN
  > ### release, but only in the development versin of vegan in R-Forge.
  > 
  > ### The tests here are not intended for human reading. The tests need
  > ### not be ecological or biologically meaningful, but they are only
  > ### intended for testing strange arguments, protect against
  > ### regressions and test correctness of results.
  > 
  > ### The tests are in a single file and you should clean work space
  > ### after the unit test. You should set random number seed (if needed)
  > ### for comparison against vegan-tests.Rout.save, and you should
  > ### remove the seed after the unit test. If possible, avoid very long
  > ### lasting tests.
  > 
  > ###<--- BEGIN TESTS --->
  > suppressPackageStartupMessages(require(vegan))
  > ###<--- BEGIN anova.cca test --->
  > ### anova.cca tests: should work with (1) subset, (2) missing values,
  > ### (3) with functions of variables poly(A1,2), (4) variables in data
  > ### frame attached or in data=, or (5) in working environment
  > set.seed(4711)
  > data(dune)
  > data(dune.env)
  > df <- dune.env
  > df$Management[c(1,5)] <- NA
  > ## formula
  > fla <- as.formula("dune ~ Management + poly(A1, 2) + spno")
  > ### variable in the .GlobalEnv
  > spno <- specnumber(dune)
  > ### data= argument
  > ## cca/rda
  > m <-  cca(fla, data=df,  na.action=na.exclude,  subset = Use != "Pasture" & spno > 7)
  Error in poly(A1, 2) : object 'A1' not found
  Calls: cca ... model.frame -> model.frame.default -> eval -> eval -> poly
  Execution halted