Running ‘testthat.R’ [5s/7s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > ## use shift-cmd-t to run all tests
  > library(testthat)
  > test_check("radiant.model")
  Loading required package: radiant.model
  Loading required package: radiant.data
  Loading required package: magrittr
  
  Attaching package: 'magrittr'
  
  The following objects are masked from 'package:testthat':
  
      equals, is_less_than, not
  
  Loading required package: ggplot2
  Loading required package: lubridate
  
  Attaching package: 'lubridate'
  
  The following objects are masked from 'package:base':
  
      date, intersect, setdiff, union
  
  Loading required package: tidyr
  
  Attaching package: 'tidyr'
  
  The following object is masked from 'package:magrittr':
  
      extract
  
  The following object is masked from 'package:testthat':
  
      matches
  
  Loading required package: dplyr
  
  Attaching package: 'dplyr'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  The following objects are masked from 'package:stats':
  
      filter, lag
  
  The following objects are masked from 'package:base':
  
      intersect, setdiff, setequal, union
  
  
  Attaching package: 'radiant.data'
  
  The following objects are masked from 'package:lubridate':
  
      month, wday
  
  The following object is masked from 'package:ggplot2':
  
      diamonds
  
  The following object is masked from 'package:magrittr':
  
      set_attr
  
  The following object is masked from 'package:testthat':
  
      describe
  
  The following object is masked from 'package:base':
  
      date
  
  SI1     9 114304.420 104924.680 123684.159  9379.739
  sex|male    0.080 -92.0%      -2.522     0.163 -15.447  < .001 ***
  2nd female      0.779 0.712 0.833
  1st female      0.896 0.856 0.926
  1st female 29.000      0.919 0.880 0.945
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 22 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_stats.R:10:3'): regress ────────────────────────────────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─capture.output(summary(result))[10] %>% trim() at test_stats.R:10:3
    2. ├─radiant.model (local) trim(.)
    3. │ └─base::gsub("^\\s+|\\s+$", "", x) at test_stats.R:3:9
    4. │   └─base::is.factor(x)
    5. ├─utils::capture.output(summary(result))
    6. │ └─base::withVisible(...elt(i))
    7. ├─base::summary(result)
    8. ├─radiant.model:::summary.regress(result)
    9. │ ├─glance(object$model) %>% round(dec)
   10. │ ├─generics::glance(object$model)
   11. │ └─broom:::glance.lm(object$model)
   12. │   ├─base::with(...)
   13. │   └─base::with.default(...)
   14. │     └─base::eval(substitute(expr), data, enclos = parent.frame())
   15. │       └─base::eval(substitute(expr), data, enclos = parent.frame())
   16. │         └─tibble::tibble(...)
   17. │           └─tibble:::tibble_quos(xs, .rows, .name_repair)
   18. │             └─rlang::eval_tidy(xs[[j]], mask)
   19. ├─stats::AIC(x)
   20. └─stats:::AIC.default(x)
  
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 22 ]
  Error: Test failures
  Execution halted