Running 'testthat.R' [130s/144s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(cvms)
  > 
  > test_check("cvms")
  -- 1. Error: gaussian evaluations are correct in baseline() (@test_baseline.R#50
  'where' must be an environment
  Backtrace:
    1. base::suppressWarnings(...)
    3. cvms::baseline(...)
    4. cvms:::create_gaussian_baseline_evaluations(...)
    5. cvms:::extract_model_effects(list(model_formula))
    5. dplyr::mutate(., model = gsub("\\s", "", .$model))
   12. tidyr::separate(...)
   16. ellipsis::check_dots_used()
   18. ellipsis:::exit_handler(action)
   19. base::bquote(...)
  
  -- 2. Error: baseline() throws expected errors (@test_baseline.R#2889)  --------
  'where' must be an environment
  Backtrace:
    1. testthat::expect_message(...)
    8. cvms::baseline(...)
    9. cvms:::create_gaussian_baseline_evaluations(...)
   10. cvms:::extract_model_effects(list(model_formula))
    5. dplyr::mutate(., model = gsub("\\s", "", .$model))
   12. tidyr::separate(...)
   21. ellipsis::check_dots_used()
   23. ellipsis:::exit_handler(action)
   24. base::bquote(...)
  
  -- 3. Error: binomial models work with cross_validate() (@test_cross_validate.R#
  'where' must be an environment
  Backtrace:
    1. cvms::cross_validate(...)
    2. cvms:::call_cross_validate(...)
    3. cvms:::cross_validate_list(...)
    7. cvms:::extract_model_effects(formulas)
    5. dplyr::mutate(., model = gsub("\\s", "", .$model))
   12. tidyr::separate(...)
   18. ellipsis::check_dots_used()
   20. ellipsis:::exit_handler(action)
   21. base::bquote(...)
  
  -- 4. Error: binomial models checks that dependent variable is numeric with cros
  'where' must be an environment
  Backtrace:
    1. cvms::cross_validate(...)
    2. cvms:::call_cross_validate(...)
    3. cvms:::cross_validate_list(...)
    7. cvms:::extract_model_effects(formulas)
    5. dplyr::mutate(., model = gsub("\\s", "", .$model))
   12. tidyr::separate(...)
   18. ellipsis::check_dots_used()
   20. ellipsis:::exit_handler(action)
   21. base::bquote(...)
  
  -- 5. Error: binomial models work with cross_validate() (@test_cross_validate.R#
  'where' must be an environment
  Backtrace:
    1. cvms::cross_validate(...)
    2. cvms:::call_cross_validate(...)
    3. cvms:::cross_validate_list(...)
    7. cvms:::extract_model_effects(formulas)
    5. dplyr::mutate(., model = gsub("\\s", "", .$model))
   12. tidyr::separate(...)
   18. ellipsis::check_dots_used()
   20. ellipsis:::exit_handler(action)
   21. base::bquote(...)
  
  -- 6. Error: gaussian model with cross_validate() (@test_cross_validate.R#400)  
  'where' must be an environment
  Backtrace:
    1. cvms::cross_validate(...)
    2. cvms:::call_cross_validate(...)
    3. cvms:::cross_validate_list(...)
    7. cvms:::extract_model_effects(formulas)
    5. dplyr::mutate(., model = gsub("\\s", "", .$model))
   12. tidyr::separate(...)
   18. ellipsis::check_dots_used()
   20. ellipsis:::exit_handler(action)
   21. base::bquote(...)
  
  -- 7. Error: gaussian mixed models with cross_validate() (@test_cross_validate.R
  'where' must be an environment
  Backtrace:
    1. cvms::cross_validate(...)
    2. cvms:::call_cross_validate(...)
    3. cvms:::cross_validate_list(...)
    7. cvms:::extract_model_effects(formulas)
    5. dplyr::mutate(., model = gsub("\\s", "", .$model))
   12. tidyr::separate(...)
   18. ellipsis::check_dots_used()
   20. ellipsis:::exit_handler(action)
   21. base::bquote(...)
  
  -- 8. Error: model using dot in formula ( y ~ . ) works with cross_validate() (@
  'where' must be an environment
  Backtrace:
    1. testthat::expect_warning(...)
    6. cvms::cross_validate(...)
    7. cvms:::call_cross_validate(...)
    8. cvms:::cross_validate_list(...)
   12. cvms:::extract_model_effects(formulas)
    6. dplyr::mutate(., model = gsub("\\s", "", .$model))
   13. tidyr::separate(...)
   23. ellipsis::check_dots_used()
   25. ellipsis:::exit_handler(action)
   26. base::bquote(...)
  
  -- 9. Error: model using inline functions in formulas works with cross_validate(
  'where' must be an environment
  Backtrace:
    1. testthat::expect_warning(...)
    6. cvms::cross_validate(...)
    7. cvms:::call_cross_validate(...)
    8. cvms:::cross_validate_list(...)
   12. cvms:::extract_model_effects(formulas)
    6. dplyr::mutate(., model = gsub("\\s", "", .$model))
   13. tidyr::separate(...)
   23. ellipsis::check_dots_used()
   25. ellipsis:::exit_handler(action)
   26. base::bquote(...)
  
  -- 10. Error: binomial models work with positive as.character in cross_validate(
  'where' must be an environment
  Backtrace:
    1. cvms::cross_validate(...)
    2. cvms:::call_cross_validate(...)
    3. cvms:::cross_validate_list(...)
    7. cvms:::extract_model_effects(formulas)
    5. dplyr::mutate(., model = gsub("\\s", "", .$model))
   12. tidyr::separate(...)
   18. ellipsis::check_dots_used()
   20. ellipsis:::exit_handler(action)
   21. base::bquote(...)
  
  -- 11. Error: gaussian models work with repeated cross_validate() (@test_cross_v
  'where' must be an environment
  Backtrace:
    1. cvms::cross_validate(...)
    2. cvms:::call_cross_validate(...)
    3. cvms:::cross_validate_list(...)
    7. cvms:::extract_model_effects(formulas)
    5. dplyr::mutate(., model = gsub("\\s", "", .$model))
   12. tidyr::separate(...)
   18. ellipsis::check_dots_used()
   20. ellipsis:::exit_handler(action)
   21. base::bquote(...)
  
  -- 12. Error: binomial glm model works with cross_validate_fn() (@test_cross_val
  'where' must be an environment
  Backtrace:
    1. cvms::cross_validate_fn(...)
    2. cvms:::cross_validate_list(...)
    6. cvms:::extract_model_effects(formulas)
    4. dplyr::mutate(., model = gsub("\\s", "", .$model))
   11. tidyr::separate(...)
   17. ellipsis::check_dots_used()
   19. ellipsis:::exit_handler(action)
   20. base::bquote(...)
  
  -- 13. Error: gaussian lm model works with cross_validate_fn() (@test_cross_vali
  'where' must be an environment
  Backtrace:
    1. cvms::cross_validate_fn(...)
    2. cvms:::cross_validate_list(...)
    6. cvms:::extract_model_effects(formulas)
    4. dplyr::mutate(., model = gsub("\\s", "", .$model))
   11. tidyr::separate(...)
   17. ellipsis::check_dots_used()
   19. ellipsis:::exit_handler(action)
   20. base::bquote(...)
  
  -- 14. Error: multinomial nnet models work with cross_validate_fn() (@test_cross
  'where' must be an environment
  Backtrace:
    1. cvms::cross_validate_fn(...)
    2. cvms:::cross_validate_list(...)
    6. cvms:::extract_model_effects(formulas)
    4. dplyr::mutate(., model = gsub("\\s", "", .$model))
   11. tidyr::separate(...)
   17. ellipsis::check_dots_used()
   19. ellipsis:::exit_handler(action)
   20. base::bquote(...)
  
  -- 15. Error: binomial random predictions work with cross_validate_fn() (@test_c
  'where' must be an environment
  Backtrace:
    1. cvms::cross_validate_fn(...)
    2. cvms:::cross_validate_list(...)
    6. cvms:::extract_model_effects(formulas)
    4. dplyr::mutate(., model = gsub("\\s", "", .$model))
   11. tidyr::separate(...)
   17. ellipsis::check_dots_used()
   19. ellipsis:::exit_handler(action)
   20. base::bquote(...)
  
  -- 16. Error: gaussian random predictions work with cross_validate_fn() (@test_c
  'where' must be an environment
  Backtrace:
    1. cvms::cross_validate_fn(...)
    2. cvms:::cross_validate_list(...)
    6. cvms:::extract_model_effects(formulas)
    4. dplyr::mutate(., model = gsub("\\s", "", .$model))
   11. tidyr::separate(...)
   17. ellipsis::check_dots_used()
   19. ellipsis:::exit_handler(action)
   20. base::bquote(...)
  
  -- 17. Error: multinomial random predictions work with cross_validate_fn() (@tes
  'where' must be an environment
  Backtrace:
    1. cvms::cross_validate_fn(...)
    2. cvms:::cross_validate_list(...)
    6. cvms:::extract_model_effects(formulas)
    4. dplyr::mutate(., model = gsub("\\s", "", .$model))
   11. tidyr::separate(...)
   17. ellipsis::check_dots_used()
   19. ellipsis:::exit_handler(action)
   20. base::bquote(...)
  
  -- 18. Error: Metrics work for glm in validate() (@test_metrics.R#19)  ---------
  'where' must be an environment
  Backtrace:
    1. cvms::validate(...)
    2. cvms:::call_validate(...)
    3. cvms:::validate_list(...)
    7. plyr::llply(...)
    9. base::lapply(pieces, .fun, ...)
   10. cvms:::FUN(X[[i]], ...)
    7. dplyr::bind_cols(., model_evaluation)
    7. tibble::add_column(...)
   15. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
   10. dplyr::mutate(., model = gsub("\\s", "", .$model))
   17. tidyr::separate(...)
   33. ellipsis::check_dots_used()
   35. ellipsis:::exit_handler(action)
   36. base::bquote(...)
  
  -- 19. Error: Metrics work for glmer in validate() (@test_metrics.R#76)  -------
  'where' must be an environment
  Backtrace:
    1. cvms::validate(...)
    2. cvms:::call_validate(...)
    3. cvms:::validate_list(...)
    7. plyr::llply(...)
    9. base::lapply(pieces, .fun, ...)
   10. cvms:::FUN(X[[i]], ...)
    7. dplyr::bind_cols(., model_evaluation)
    7. tibble::add_column(...)
   15. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
   10. dplyr::mutate(., model = gsub("\\s", "", .$model))
   17. tidyr::separate(...)
   33. ellipsis::check_dots_used()
   35. ellipsis:::exit_handler(action)
   36. base::bquote(...)
  
  -- 20. Error: Metrics work for glm in validate() (@test_metrics.R#137)  --------
  'where' must be an environment
  Backtrace:
    1. cvms::validate(...)
    2. cvms:::call_validate(...)
    3. cvms:::validate_list(...)
    7. plyr::llply(...)
    9. base::lapply(pieces, .fun, ...)
   10. cvms:::FUN(X[[i]], ...)
    7. dplyr::bind_cols(., model_evaluation)
    7. tibble::add_column(...)
   15. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
   10. dplyr::mutate(., model = gsub("\\s", "", .$model))
   17. tidyr::separate(...)
   33. ellipsis::check_dots_used()
   35. ellipsis:::exit_handler(action)
   36. base::bquote(...)
  
  -- 21. Error: Metrics work for glmer in validate() (@test_metrics.R#198)  ------
  'where' must be an environment
  Backtrace:
    1. cvms::validate(...)
    2. cvms:::call_validate(...)
    3. cvms:::validate_list(...)
    7. plyr::llply(...)
    9. base::lapply(pieces, .fun, ...)
   10. cvms:::FUN(X[[i]], ...)
    7. dplyr::bind_cols(., model_evaluation)
    7. tibble::add_column(...)
   15. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
   10. dplyr::mutate(., model = gsub("\\s", "", .$model))
   17. tidyr::separate(...)
   33. ellipsis::check_dots_used()
   35. ellipsis:::exit_handler(action)
   36. base::bquote(...)
  
  -- 22. Error: Metrics work when 0 is positive class for glmer in validate() (@te
  'where' must be an environment
  Backtrace:
    1. cvms::validate(...)
    2. cvms:::call_validate(...)
    3. cvms:::validate_list(...)
    7. plyr::llply(...)
    9. base::lapply(pieces, .fun, ...)
   10. cvms:::FUN(X[[i]], ...)
    7. dplyr::bind_cols(., model_evaluation)
    7. tibble::add_column(...)
   15. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
   10. dplyr::mutate(., model = gsub("\\s", "", .$model))
   17. tidyr::separate(...)
   33. ellipsis::check_dots_used()
   35. ellipsis:::exit_handler(action)
   36. base::bquote(...)
  
  -- 23. Error: formulas without random effects are properly reconstructed from cr
  'where' must be an environment
  Backtrace:
    1. cvms::cross_validate(data, formulas = model_formulas, family = "gaussian")
    2. cvms:::call_cross_validate(...)
    3. cvms:::cross_validate_list(...)
    7. cvms:::extract_model_effects(formulas)
    5. dplyr::mutate(., model = gsub("\\s", "", .$model))
   12. tidyr::separate(...)
   18. ellipsis::check_dots_used()
   20. ellipsis:::exit_handler(action)
   21. base::bquote(...)
  
  -- 24. Error: formulas with random effects are properly reconstructed from cross
  'where' must be an environment
  Backtrace:
    1. xpectr::suppress_mw(...)
    6. cvms::cross_validate(data, formulas = model_formulas, family = "gaussian")
    7. cvms:::call_cross_validate(...)
    8. cvms:::cross_validate_list(...)
   12. cvms:::extract_model_effects(formulas)
    6. dplyr::mutate(., model = gsub("\\s", "", .$model))
   13. tidyr::separate(...)
   23. ellipsis::check_dots_used()
   25. ellipsis:::exit_handler(action)
   26. base::bquote(...)
  
  -- 25. Error: binomial model work with validate() (@test_validate.R#23)  -------
  'where' must be an environment
  Backtrace:
    1. cvms::validate(...)
    2. cvms:::call_validate(...)
    3. cvms:::validate_list(...)
    7. plyr::llply(...)
    9. base::lapply(pieces, .fun, ...)
   10. cvms:::FUN(X[[i]], ...)
    7. dplyr::bind_cols(., model_evaluation)
    7. tibble::add_column(...)
   15. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
   10. dplyr::mutate(., model = gsub("\\s", "", .$model))
   17. tidyr::separate(...)
   33. ellipsis::check_dots_used()
   35. ellipsis:::exit_handler(action)
   36. base::bquote(...)
  
  -- 26. Error: binomial mixed model work with validate() (@test_validate.R#177)  
  'where' must be an environment
  Backtrace:
    1. cvms::validate(...)
    2. cvms:::call_validate(...)
    3. cvms:::validate_list(...)
    7. plyr::llply(...)
    9. base::lapply(pieces, .fun, ...)
   10. cvms:::FUN(X[[i]], ...)
    7. dplyr::bind_cols(., model_evaluation)
    7. tibble::add_column(...)
   15. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
   10. dplyr::mutate(., model = gsub("\\s", "", .$model))
   17. tidyr::separate(...)
   33. ellipsis::check_dots_used()
   35. ellipsis:::exit_handler(action)
   36. base::bquote(...)
  
  -- 27. Error: gaussian model with validate() (@test_validate.R#369)  -----------
  'where' must be an environment
  Backtrace:
    1. cvms::validate(...)
    2. cvms:::call_validate(...)
    3. cvms:::validate_list(...)
    7. plyr::llply(...)
    9. base::lapply(pieces, .fun, ...)
   10. cvms:::FUN(X[[i]], ...)
    7. dplyr::bind_cols(., model_evaluation)
    7. tibble::add_column(...)
   15. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
   10. dplyr::mutate(., model = gsub("\\s", "", .$model))
   17. tidyr::separate(...)
   33. ellipsis::check_dots_used()
   35. ellipsis:::exit_handler(action)
   36. base::bquote(...)
  
  -- 28. Error: Right glm model used in validate() (@test_validate.R#451)  -------
  'where' must be an environment
  Backtrace:
    1. cvms::validate(...)
    2. cvms:::call_validate(...)
    3. cvms:::validate_list(...)
    7. plyr::llply(...)
    9. base::lapply(pieces, .fun, ...)
   10. cvms:::FUN(X[[i]], ...)
    7. dplyr::bind_cols(., model_evaluation)
    7. tibble::add_column(...)
   15. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
   10. dplyr::mutate(., model = gsub("\\s", "", .$model))
   17. tidyr::separate(...)
   33. ellipsis::check_dots_used()
   35. ellipsis:::exit_handler(action)
   36. base::bquote(...)
  
  -- 29. Error: Right glmer model used in validate() (@test_validate.R#491)  -----
  'where' must be an environment
  Backtrace:
    1. cvms::validate(...)
    2. cvms:::call_validate(...)
    3. cvms:::validate_list(...)
    7. plyr::llply(...)
    9. base::lapply(pieces, .fun, ...)
   10. cvms:::FUN(X[[i]], ...)
    7. dplyr::bind_cols(., model_evaluation)
    7. tibble::add_column(...)
   15. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
   10. dplyr::mutate(., model = gsub("\\s", "", .$model))
   17. tidyr::separate(...)
   33. ellipsis::check_dots_used()
   35. ellipsis:::exit_handler(action)
   36. base::bquote(...)
  
  -- 30. Error: model using dot in formula ( y ~ . ) works with validate() (@test_
  'where' must be an environment
  Backtrace:
    1. testthat::expect_warning(...)
    6. cvms::validate(...)
    7. cvms:::call_validate(...)
    8. cvms:::validate_list(...)
   12. plyr::llply(...)
   14. base::lapply(pieces, .fun, ...)
   15. cvms:::FUN(X[[i]], ...)
    8. dplyr::bind_cols(., model_evaluation)
    8. tibble::add_column(...)
   16. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
   11. dplyr::mutate(., model = gsub("\\s", "", .$model))
   18. tidyr::separate(...)
   38. ellipsis::check_dots_used()
   40. ellipsis:::exit_handler(action)
   41. base::bquote(...)
  
  -- 31. Error: Singular fit messages counted in validate() (@test_validate.R#577)
  'where' must be an environment
  Backtrace:
    1. testthat::expect_message(...)
    6. cvms::validate(...)
    7. cvms:::call_validate(...)
    8. cvms:::validate_list(...)
   12. plyr::llply(...)
   14. base::lapply(pieces, .fun, ...)
   15. cvms:::FUN(X[[i]], ...)
    8. dplyr::bind_cols(., model_evaluation)
    8. tibble::add_column(...)
   16. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
   11. dplyr::mutate(., model = gsub("\\s", "", .$model))
   18. tidyr::separate(...)
   38. ellipsis::check_dots_used()
   40. ellipsis:::exit_handler(action)
   41. base::bquote(...)
  
  -- 32. Error: binomial glm model works with validate_fn() (@test_validate_fn.R#7
  'where' must be an environment
  Backtrace:
    1. base::suppressWarnings(...)
    3. cvms::validate_fn(...)
    4. cvms:::validate_list(...)
    8. plyr::llply(...)
   10. base::lapply(pieces, .fun, ...)
   11. cvms:::FUN(X[[i]], ...)
    7. dplyr::bind_cols(., model_evaluation)
    7. tibble::add_column(...)
   15. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
   10. dplyr::mutate(., model = gsub("\\s", "", .$model))
   17. tidyr::separate(...)
   34. ellipsis::check_dots_used()
   36. ellipsis:::exit_handler(action)
   37. base::bquote(...)
  
  -- 33. Error: testing nested tibbles in multinomial validate_fn() (@test_validat
  'where' must be an environment
  Backtrace:
    1. cvms::validate_fn(...)
    2. cvms:::validate_list(...)
    6. plyr::llply(...)
    8. base::lapply(pieces, .fun, ...)
    9. cvms:::FUN(X[[i]], ...)
    6. dplyr::bind_cols(., model_evaluation)
    6. tibble::add_column(...)
   14. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
    9. dplyr::mutate(., model = gsub("\\s", "", .$model))
   16. tidyr::separate(...)
   32. ellipsis::check_dots_used()
   34. ellipsis:::exit_handler(action)
   35. base::bquote(...)
  
  -- 34. Error: testing nested tibbles in gaussian validate_fn() (@test_validate_f
  'where' must be an environment
  Backtrace:
    1. cvms::validate_fn(...)
    2. cvms:::validate_list(...)
    6. plyr::llply(...)
    8. base::lapply(pieces, .fun, ...)
    9. cvms:::FUN(X[[i]], ...)
    6. dplyr::bind_cols(., model_evaluation)
    6. tibble::add_column(...)
   14. dplyr::bind_cols(., extract_model_effects(model_specifics[["model_formula"]]))
    9. dplyr::mutate(., model = gsub("\\s", "", .$model))
   16. tidyr::separate(...)
   32. ellipsis::check_dots_used()
   34. ellipsis:::exit_handler(action)
   35. base::bquote(...)
  
  == testthat results  ===========================================================
  [ OK: 2887 | SKIPPED: 61 | WARNINGS: 0 | FAILED: 34 ]
  1. Error: gaussian evaluations are correct in baseline() (@test_baseline.R#508) 
  2. Error: baseline() throws expected errors (@test_baseline.R#2889) 
  3. Error: binomial models work with cross_validate() (@test_cross_validate.R#36) 
  4. Error: binomial models checks that dependent variable is numeric with cross_validate() (@test_cross_validate.R#149) 
  5. Error: binomial models work with cross_validate() (@test_cross_validate.R#264) 
  6. Error: gaussian model with cross_validate() (@test_cross_validate.R#400) 
  7. Error: gaussian mixed models with cross_validate() (@test_cross_validate.R#560) 
  8. Error: model using dot in formula ( y ~ . ) works with cross_validate() (@test_cross_validate.R#949) 
  9. Error: model using inline functions in formulas works with cross_validate() (@test_cross_validate.R#980) 
  1. ...
  
  Error: testthat unit tests failed
  Execution halted