Running ‘testthat.R’ [30s/40s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(arsenal)
  > 
  > test_check("arsenal")
  [ FAIL 33 | WARN 0 | SKIP 11 | PASS 413 ]
  
  ══ Skipped tests (11) ══════════════════════════════════════════════════════════
  • On CRAN (11): 'test_write2.R:31:3', 'test_write2.R:37:3',
    'test_write2.R:45:3', 'test_write2.R:50:3', 'test_write2.R:104:3',
    'test_write2.R:108:3', 'test_write2.R:112:3', 'test_write2.R:123:3',
    'test_write2.R:128:3', 'test_write2.R:134:3', 'test_write2.R:189:3'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_keep.labels.R:77:3'): Keep labels in modelsum ──────────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_keep.labels.R:77:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(...)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_lhs_modelsum.R:8:3'): A three-LHS modelsum call ────────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_lhs_modelsum.R:8:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(...)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_lhs_modelsum.R:19:3'): A modelsum call with strata ─────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_lhs_modelsum.R:19:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(...)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_lhs_modelsum.R:48:3'): strata levels are maintained ────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_lhs_modelsum.R:48:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::set_labels(...)
    9. ├─arsenal::modelsum(...)
   10. │ └─arsenal:::modelsum_guts(...)
   11. │   ├─broom::glance(fit)
   12. │   └─broom:::glance.lm(fit)
   13. │     ├─base::with(...)
   14. │     └─base::with.default(...)
   15. │       └─base::eval(substitute(expr), data, enclos = parent.frame())
   16. │         └─base::eval(substitute(expr), data, enclos = parent.frame())
   17. │           └─tibble::tibble(...)
   18. │             └─tibble:::tibble_quos(xs, .rows, .name_repair)
   19. │               └─rlang::eval_tidy(xs[[j]], mask)
   20. ├─stats::AIC(x)
   21. └─stats:::AIC.default(x)
  ── Error ('test_lhs_modelsum.R:71:3'): Multiple adjustments work (#240) ────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─arsenal::modelsum(...) at test_lhs_modelsum.R:71:3
    2. │ └─arsenal:::modelsum_guts(...)
    3. │   ├─broom::glance(fit)
    4. │   └─broom:::glance.lm(fit)
    5. │     ├─base::with(...)
    6. │     └─base::with.default(...)
    7. │       └─base::eval(substitute(expr), data, enclos = parent.frame())
    8. │         └─base::eval(substitute(expr), data, enclos = parent.frame())
    9. │           └─tibble::tibble(...)
   10. │             └─tibble:::tibble_quos(xs, .rows, .name_repair)
   11. │               └─rlang::eval_tidy(xs[[j]], mask)
   12. ├─stats::AIC(x)
   13. └─stats:::AIC.default(x)
  ── Error ('test_lhs_modelsum.R:190:3'): Reordering variables and subsetting ────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─arsenal::modelsum(...) at test_lhs_modelsum.R:190:3
    2. │ └─arsenal:::modelsum_guts(...)
    3. │   ├─broom::glance(fit)
    4. │   └─broom:::glance.lm(fit)
    5. │     ├─base::with(...)
    6. │     └─base::with.default(...)
    7. │       └─base::eval(substitute(expr), data, enclos = parent.frame())
    8. │         └─base::eval(substitute(expr), data, enclos = parent.frame())
    9. │           └─tibble::tibble(...)
   10. │             └─tibble:::tibble_quos(xs, .rows, .name_repair)
   11. │               └─rlang::eval_tidy(xs[[j]], mask)
   12. ├─stats::AIC(x)
   13. └─stats:::AIC.default(x)
  ── Error ('test_lhs_modelsum.R:222:3'): Merging modelsum objects ───────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─arsenal::modelsum(...) at test_lhs_modelsum.R:222:3
    2. │ └─arsenal:::modelsum_guts(...)
    3. │   ├─broom::glance(fit)
    4. │   └─broom:::glance.lm(fit)
    5. │     ├─base::with(...)
    6. │     └─base::with.default(...)
    7. │       └─base::eval(substitute(expr), data, enclos = parent.frame())
    8. │         └─base::eval(substitute(expr), data, enclos = parent.frame())
    9. │           └─tibble::tibble(...)
   10. │             └─tibble:::tibble_quos(xs, .rows, .name_repair)
   11. │               └─rlang::eval_tidy(xs[[j]], mask)
   12. ├─stats::AIC(x)
   13. └─stats:::AIC.default(x)
  ── Error ('test_lhs_modelsum.R:253:3'): Changing labels ────────────────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─arsenal::modelsum(...) at test_lhs_modelsum.R:253:3
    2. │ └─arsenal:::modelsum_guts(...)
    3. │   ├─broom::glance(fit)
    4. │   └─broom:::glance.lm(fit)
    5. │     ├─base::with(...)
    6. │     └─base::with.default(...)
    7. │       └─base::eval(substitute(expr), data, enclos = parent.frame())
    8. │         └─base::eval(substitute(expr), data, enclos = parent.frame())
    9. │           └─tibble::tibble(...)
   10. │             └─tibble:::tibble_quos(xs, .rows, .name_repair)
   11. │               └─rlang::eval_tidy(xs[[j]], mask)
   12. ├─stats::AIC(x)
   13. └─stats:::AIC.default(x)
  ── Error ('test_lhs_modelsum.R:391:3'): 02/23/2018: wrapping long labels (#59) ──
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_lhs_modelsum.R:391:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::print(...)
    8. ├─base::summary(...)
    9. ├─arsenal::modelsum(...)
   10. │ └─arsenal:::modelsum_guts(...)
   11. │   ├─broom::glance(fit)
   12. │   └─broom:::glance.lm(fit)
   13. │     ├─base::with(...)
   14. │     └─base::with.default(...)
   15. │       └─base::eval(substitute(expr), data, enclos = parent.frame())
   16. │         └─base::eval(substitute(expr), data, enclos = parent.frame())
   17. │           └─tibble::tibble(...)
   18. │             └─tibble:::tibble_quos(xs, .rows, .name_repair)
   19. │               └─rlang::eval_tidy(xs[[j]], mask)
   20. ├─stats::AIC(x)
   21. └─stats:::AIC.default(x)
  ── Error ('test_modelsum.R:13:3'): A basic modelsum call--no labels, no missings ──
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:13:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(modelsum(Age ~ Sex + time, data = mdat), text = TRUE)
    8. ├─arsenal::modelsum(Age ~ Sex + time, data = mdat)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:26:3'): A basic modelsum tableby call--labels, no missings ──
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:26:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(modelsum(Age ~ Sex + trt, data = mdat), text = TRUE)
    8. ├─arsenal::modelsum(Age ~ Sex + trt, data = mdat)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:39:3'): A basic modelsum call--adding adjustment ────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:39:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(Age ~ Sex + time, adjust = ~trt, data = mdat)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:54:3'): A basic modelsum call--suppressing intercept and/or adjustment vars ──
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:54:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(Age ~ Sex + time, adjust = ~trt, data = mdat)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:90:3'): Reordering variables ────────────────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:90:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(Age ~ Sex + Group + time, data = mdat)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:170:3'): 'weights=' works ───────────────────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:170:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(modelsum(Age ~ Sex, data = mdat, weights = weights))
    8. ├─arsenal::modelsum(Age ~ Sex, data = mdat, weights = weights)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:181:3'): interactions work ──────────────────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:181:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(modelsum(age ~ bmi, adjust = ~sex * arm, data = mockstudy))
    8. ├─arsenal::modelsum(age ~ bmi, adjust = ~sex * arm, data = mockstudy)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:286:5'): negbin works ───────────────────────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:286:5
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(...)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─base::suppressWarnings(broom::glance(fit))
   11. │   │ └─base::withCallingHandlers(...)
   12. │   ├─broom::glance(fit)
   13. │   └─broom:::glance.negbin(fit)
   14. │     └─tibble::tibble(...)
   15. │       └─tibble:::tibble_quos(xs, .rows, .name_repair)
   16. │         └─rlang::eval_tidy(xs[[j]], mask)
   17. ├─stats::AIC(x)
   18. └─stats:::AIC.default(x)
  ── Error ('test_modelsum.R:312:3'): 01/26/2017: Brendan Broderick's Bold Text Wrapping Problem ──
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:312:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(...)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Failure ('test_modelsum.R:330:3'): 02/07/2017: Ryan Lennon's R Markdown spacing problem. Also 02/14/2018 (#66) ──
  `capture.kable(...)` threw an error.
  Message: could not find function "ll"
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test_modelsum.R:330:3
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─arsenal:::capture.kable(...)
    7. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    8. │   └─base::withVisible(...elt(i))
    9. ├─base::summary(modelsum(Age ~ Sex + time, data = mdat), text = TRUE)
   10. ├─arsenal::modelsum(Age ~ Sex + time, data = mdat)
   11. │ └─arsenal:::modelsum_guts(...)
   12. │   ├─broom::glance(fit)
   13. │   └─broom:::glance.lm(fit)
   14. │     ├─base::with(...)
   15. │     └─base::with.default(...)
   16. │       └─base::eval(substitute(expr), data, enclos = parent.frame())
   17. │         └─base::eval(substitute(expr), data, enclos = parent.frame())
   18. │           └─tibble::tibble(...)
   19. │             └─tibble:::tibble_quos(xs, .rows, .name_repair)
   20. │               └─rlang::eval_tidy(xs[[j]], mask)
   21. ├─stats::AIC(x)
   22. └─stats:::AIC.default(x)
  ── Error ('test_modelsum.R:368:3'): 04/12/2017: ... vs modelsum.control ────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:368:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(...)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:405:3'): 07/27/2017: Too many adjustment vars in as.data.frame.modelsum (#12) ──
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test_modelsum.R:405:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─base::nrow(...)
    5. ├─base::as.data.frame(...)
    6. ├─arsenal::modelsum(y ~ x1, adjust = ~x7 + x2 + x3 + x5 + x8, data = df)
    7. │ └─arsenal:::modelsum_guts(...)
    8. │   ├─broom::glance(fit)
    9. │   └─broom:::glance.lm(fit)
   10. │     ├─base::with(...)
   11. │     └─base::with.default(...)
   12. │       └─base::eval(substitute(expr), data, enclos = parent.frame())
   13. │         └─base::eval(substitute(expr), data, enclos = parent.frame())
   14. │           └─tibble::tibble(...)
   15. │             └─tibble:::tibble_quos(xs, .rows, .name_repair)
   16. │               └─rlang::eval_tidy(xs[[j]], mask)
   17. ├─stats::AIC(x)
   18. └─stats:::AIC.default(x)
  ── Error ('test_modelsum.R:411:3'): 07/27/2017: modelsum labels (#13) ──────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:411:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(bmi ~ age, adjust = ~sex, data = mockstudy)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:435:3'): 12/23/2017: non-syntactic names (#44, #45) ──
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:435:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(summary(modelsum(y ~ x1x, data = dat)))
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(modelsum(y ~ x1x, data = dat))
    8. ├─arsenal::modelsum(y ~ x1x, data = dat)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:456:3'): 01/05/2018: leading/trailing whitespace (#48) ──
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:456:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(age ~ arm, data = set_labels(mockstudy, list(arm = " Arm ")))
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:484:3'): 02/23/2018: wrapping long labels (#59) ─────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:484:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::print(...)
    8. ├─base::summary(...)
    9. ├─arsenal::modelsum(...)
   10. │ └─arsenal:::modelsum_guts(...)
   11. │   ├─broom::glance(fit)
   12. │   └─broom:::glance.lm(fit)
   13. │     ├─base::with(...)
   14. │     └─base::with.default(...)
   15. │       └─base::eval(substitute(expr), data, enclos = parent.frame())
   16. │         └─base::eval(substitute(expr), data, enclos = parent.frame())
   17. │           └─tibble::tibble(...)
   18. │             └─tibble:::tibble_quos(xs, .rows, .name_repair)
   19. │               └─rlang::eval_tidy(xs[[j]], mask)
   20. ├─stats::AIC(x)
   21. └─stats:::AIC.default(x)
  ── Error ('test_modelsum.R:513:3'): 05/31/2018: similar column names (#98) ─────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:513:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(modelsum(y ~ b, adjust = ~a + aa, data = dat))
    8. ├─arsenal::modelsum(y ~ b, adjust = ~a + aa, data = dat)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:533:3'): 05/31/2018: similar column names (#100) ────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:533:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(...)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:547:3'): 06/19/2018: term.name (#109) ───────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:547:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(Age ~ Sex + time, adjust = ~trt, data = mdat)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:564:3'): 08/24/2018: latex (#123) ───────────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:564:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─utils::capture.output(...)
    5. │ └─base::withVisible(...elt(i))
    6. ├─base::summary(...)
    7. ├─arsenal::modelsum(Age ~ Sex, adjust = ~trt, data = mdat)
    8. │ └─arsenal:::modelsum_guts(...)
    9. │   ├─broom::glance(fit)
   10. │   └─broom:::glance.lm(fit)
   11. │     ├─base::with(...)
   12. │     └─base::with.default(...)
   13. │       └─base::eval(substitute(expr), data, enclos = parent.frame())
   14. │         └─base::eval(substitute(expr), data, enclos = parent.frame())
   15. │           └─tibble::tibble(...)
   16. │             └─tibble:::tibble_quos(xs, .rows, .name_repair)
   17. │               └─rlang::eval_tidy(xs[[j]], mask)
   18. ├─stats::AIC(x)
   19. └─stats:::AIC.default(x)
  ── Error ('test_modelsum.R:587:3'): 09/05/2018: correctly label contrasts for ordinal variables (#133) ──
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:587:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(...)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:624:3'): 08/07/2019: p.value.lrt (#238) ─────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test_modelsum.R:624:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─arsenal:::capture.kable(...)
    5. │ └─utils::capture.output(x) at tests/testthat/helper-script.R:4:3
    6. │   └─base::withVisible(...elt(i))
    7. ├─base::summary(...)
    8. ├─arsenal::modelsum(...)
    9. │ └─arsenal:::modelsum_guts(...)
   10. │   ├─broom::glance(fit)
   11. │   └─broom:::glance.lm(fit)
   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)
  ── Error ('test_modelsum.R:650:3'): statistic.F works (#262) ───────────────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─arsenal::modelsum(...) at test_modelsum.R:650:3
    2. │ └─arsenal:::modelsum_guts(...)
    3. │   ├─broom::glance(fit)
    4. │   └─broom:::glance.lm(fit)
    5. │     ├─base::with(...)
    6. │     └─base::with.default(...)
    7. │       └─base::eval(substitute(expr), data, enclos = parent.frame())
    8. │         └─base::eval(substitute(expr), data, enclos = parent.frame())
    9. │           └─tibble::tibble(...)
   10. │             └─tibble:::tibble_quos(xs, .rows, .name_repair)
   11. │               └─rlang::eval_tidy(xs[[j]], mask)
   12. ├─stats::AIC(x)
   13. └─stats:::AIC.default(x)
  ── Error ('test_write2.R:57:3'): write2.list (summary objects) -> PDF ──────────
  Error in `ll(object)`: could not find function "ll"
  Backtrace:
       ▆
    1. ├─base::summary(modelsum(age ~ sex, data = mockstudy), title = "A Title for modelsum") at test_write2.R:57:3
    2. ├─arsenal::modelsum(age ~ sex, data = mockstudy)
    3. │ └─arsenal:::modelsum_guts(...)
    4. │   ├─broom::glance(fit)
    5. │   └─broom:::glance.lm(fit)
    6. │     ├─base::with(...)
    7. │     └─base::with.default(...)
    8. │       └─base::eval(substitute(expr), data, enclos = parent.frame())
    9. │         └─base::eval(substitute(expr), data, enclos = parent.frame())
   10. │           └─tibble::tibble(...)
   11. │             └─tibble:::tibble_quos(xs, .rows, .name_repair)
   12. │               └─rlang::eval_tidy(xs[[j]], mask)
   13. ├─stats::AIC(x)
   14. └─stats:::AIC.default(x)
  
  [ FAIL 33 | WARN 0 | SKIP 11 | PASS 413 ]
  Error: Test failures
  Execution halted