Running ‘testthat.R’ [3s/4s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(eudract)
  > 
  > test_check("eudract")
  ── 1. Error: (unknown) (@test_basic.R#220)  ────────────────────────────────────
  'where' must be an environment
  Backtrace:
    1. eudract::safety_summary(events, n_exposed, soc_index = "soc_term")
    2. [ `%<>%`(...) ] with 7 more calls
   11. tidyr:::complete.data.frame(...)
   12. tidyr::replace_na(full, replace = fill)
   13. ellipsis::check_dots_used()
   15. ellipsis:::exit_handler(action)
   16. base::bquote(...)
  
  ── 2. Error: no aes (@test_errors.R#15)  ───────────────────────────────────────
  'where' must be an environment
  Backtrace:
    1. testthat::expect_warning(...)
    6. eudract::safety_summary(no_aes, exposed = 10, soc = "soc_term")
    7. [ `%<>%`(...) ] with 7 more calls
   16. tidyr:::complete.data.frame(...)
   17. tidyr::replace_na(full, replace = fill)
   18. ellipsis::check_dots_used()
   20. ellipsis:::exit_handler(action)
   21. base::bquote(...)
  
  ── 3. Error: no saes (@test_errors.R#28)  ──────────────────────────────────────
  'where' must be an environment
  Backtrace:
    1. testthat::expect_warning(...)
    6. eudract::safety_summary(no_saes, exposed = 10, soc = "soc_term")
    7. [ `%<>%`(...) ] with 7 more calls
   16. tidyr:::complete.data.frame(...)
   17. tidyr::replace_na(full, replace = fill)
   18. ellipsis::check_dots_used()
   20. ellipsis:::exit_handler(action)
   21. base::bquote(...)
  
  ── 4. Error: empty group (@test_errors.R#47)  ──────────────────────────────────
  'where' must be an environment
  Backtrace:
    1. testthat::expect_warning(...)
    6. eudract::safety_summary(...)
    7. [ `%<>%`(...) ] with 7 more calls
   16. tidyr:::complete.data.frame(...)
   17. tidyr::replace_na(full, replace = fill)
   18. ellipsis::check_dots_used()
   20. ellipsis:::exit_handler(action)
   21. base::bquote(...)
  
  ── 5. Error: missing variable (@test_errors.R#61)  ─────────────────────────────
  'where' must be an environment
  Backtrace:
    1. testthat::expect_is(...)
    4. eudract::safety_summary(aes, exposed = c(700, 750, 730), soc_index = "soc_term")
    5. [ `%<>%`(...) ] with 7 more calls
   14. tidyr:::complete.data.frame(...)
   15. tidyr::replace_na(full, replace = fill)
   16. ellipsis::check_dots_used()
   18. ellipsis:::exit_handler(action)
   19. base::bquote(...)
  
  ── 6. Error: exposed has too few elements (@test_errors.R#67)  ─────────────────
  'where' must be an environment
  Backtrace:
    1. testthat::expect_is(...)
    4. eudract::safety_summary(aes, exposed = c(700, 750, 730), soc_index = "soc_term")
    5. [ `%<>%`(...) ] with 7 more calls
   14. tidyr:::complete.data.frame(...)
   15. tidyr::replace_na(full, replace = fill)
   16. ellipsis::check_dots_used()
   18. ellipsis:::exit_handler(action)
   19. base::bquote(...)
  
  ── 7. Error:  numbers exposed to low (@test_errors.R#74)  ──────────────────────
  'where' must be an environment
  Backtrace:
    1. testthat::expect_is(...)
    4. eudract::safety_summary(safety, exposed = c(15, 33))
    5. [ `%<>%`(...) ] with 7 more calls
   14. tidyr:::complete.data.frame(...)
   15. tidyr::replace_na(full, replace = fill)
   16. ellipsis::check_dots_used()
   18. ellipsis:::exit_handler(action)
   19. base::bquote(...)
  
  ── 8. Error: wrong lenght for excess deaths (@test_errors.R#86)  ───────────────
  'where' must be an environment
  Backtrace:
    1. testthat::expect_is(...)
    4. eudract::safety_summary(aes, exposed = c(700, 750, 730), soc_index = "soc_term")
    5. [ `%<>%`(...) ] with 7 more calls
   14. tidyr:::complete.data.frame(...)
   15. tidyr::replace_na(full, replace = fill)
   16. ellipsis::check_dots_used()
   18. ellipsis:::exit_handler(action)
   19. base::bquote(...)
  
  ── 9. Error: induced errors in the safety_summary output (@test_errors.R#102)  ─
  'where' must be an environment
  Backtrace:
    1. eudract::safety_summary(aes, exposed = c(700, 750, 730), soc_index = "soc_term")
    2. [ `%<>%`(...) ] with 7 more calls
   11. tidyr:::complete.data.frame(...)
   12. tidyr::replace_na(full, replace = fill)
   13. ellipsis::check_dots_used()
   15. ellipsis:::exit_handler(action)
   16. base::bquote(...)
  
  ── 10. Error: create.safety_summary name checks (@test_errors.R#122)  ──────────
  'where' must be an environment
  Backtrace:
    1. eudract::safety_summary(safety, c(67, 60))
    2. [ `%<>%`(...) ] with 7 more calls
   11. tidyr:::complete.data.frame(...)
   12. tidyr::replace_na(full, replace = fill)
   13. ellipsis::check_dots_used()
   15. ellipsis:::exit_handler(action)
   16. base::bquote(...)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  [ OK: 11 | SKIPPED: 0 | WARNINGS: 2 | FAILED: 10 ]
  1.  Error: (unknown) (@test_basic.R#220) 
  2.  Error: no aes (@test_errors.R#15) 
  3.  Error: no saes (@test_errors.R#28) 
  4.  Error: empty group (@test_errors.R#47) 
  5.  Error: missing variable (@test_errors.R#61) 
  6.  Error: exposed has too few elements (@test_errors.R#67) 
  7.  Error:  numbers exposed to low (@test_errors.R#74) 
  8.  Error: wrong lenght for excess deaths (@test_errors.R#86) 
  9.  Error: induced errors in the safety_summary output (@test_errors.R#102) 
  10. Error: create.safety_summary name checks (@test_errors.R#122) 
  
  Error: testthat unit tests failed
  Execution halted