Running ‘testthat.R’ [150s/202s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(bayesassurance)
  > 
  > test_check("bayesassurance")
  [1] 20 10
  [1] 30 10
  [1] 40 10
  [1] 20 20
  [1] 30 20
  [1] 40 20
  [1] 20 30
  [1] 30 30
  [1] 40 30
  [1] 20 10
  [1] 30 10
  [1] 40 10
  [1] 20 20
  [1] 30 20
  [1] 40 20
  [1] 20 30
  [1] 30 30
  [1] 40 30
  [1] 20 10
  [1] 30 20
  [1] 40 30
  [1] 10 20
  [1] 10 20
  [ FAIL 15 | WARN 92 | SKIP 0 | PASS 125 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure ('test-bayes_adcock.R:47:3'): Assurance plot output is a ggplot ─────
  is.ggplot(out$assurance_plot) is not TRUE
  
  `actual`:   FALSE
  `expected`: TRUE 
  ── Error ('test-bayes_adcock.R:57:3'): Correct labels on x and y axes ──────────
  <notSubsettableError/error/condition>
  Error in `out$assurance_plot$labels`: object of type 'object' is not subsettable
  Backtrace:
      ▆
   1. └─testthat::expect_identical(out$assurance_plot$labels$y, "Assurance") at test-bayes_adcock.R:57:3
   2.   └─testthat::quasi_label(enquo(object), label, arg = "object")
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Failure ('test-bayes_goal_func.R:52:3'): Rate of correct classification plot is a ggplot ──
  is.ggplot(out$rc_plot) is not TRUE
  
  `actual`:   FALSE
  `expected`: TRUE 
  ── Error ('test-bayes_goal_func.R:63:3'): Correct labels on x and y axes ───────
  <notSubsettableError/error/condition>
  Error in `out$rc_plot$labels`: object of type 'object' is not subsettable
  Backtrace:
      ▆
   1. └─testthat::expect_identical(out$rc_plot$labels$y, "Rate of Correct Classification") at test-bayes_goal_func.R:63:3
   2.   └─testthat::quasi_label(enquo(object), label, arg = "object")
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Failure ('test-bayes_sim.R:57:3'): Assurance plot output is a ggplot ────────
  is.ggplot(out$assurance_plot) is not TRUE
  
  `actual`:   FALSE
  `expected`: TRUE 
  ── Error ('test-bayes_sim.R:70:3'): Correct labels on x and y axes ─────────────
  <notSubsettableError/error/condition>
  Error in `out$assurance_plot$labels`: object of type 'object' is not subsettable
  Backtrace:
      ▆
   1. └─testthat::expect_identical(out$assurance_plot$labels$y, "Assurance") at test-bayes_sim.R:70:3
   2.   └─testthat::quasi_label(enquo(object), label, arg = "object")
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Failure ('test-bayes_sim_betabinomial.R:53:3'): Assurance plot output is a ggplot ──
  is.ggplot(out$assurance_plot) is not TRUE
  
  `actual`:   FALSE
  `expected`: TRUE 
  ── Error ('test-bayes_sim_betabinomial.R:65:3'): Correct labels on x and y axes ──
  <notSubsettableError/error/condition>
  Error in `out$assurance_plot$labels`: object of type 'object' is not subsettable
  Backtrace:
      ▆
   1. └─testthat::expect_identical(out$assurance_plot$labels$y, "Assurance") at test-bayes_sim_betabinomial.R:65:3
   2.   └─testthat::quasi_label(enquo(object), label, arg = "object")
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Error ('test-bayes_sim_unknownvar.R:75:3'): Correct labels on x and y axes of assurance plot ──
  <notSubsettableError/error/condition>
  Error in `out$assur_plot$labels`: object of type 'object' is not subsettable
  Backtrace:
      ▆
   1. └─testthat::expect_identical(out$assur_plot$labels$y, "Assurance") at test-bayes_sim_unknownvar.R:75:3
   2.   └─testthat::quasi_label(enquo(object), label, arg = "object")
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Failure ('test-bayesassurance.R:28:3'): Assurance plot output is a ggplot ───
  is.ggplot(out$assurance_plot) is not TRUE
  
  `actual`:   FALSE
  `expected`: TRUE 
  ── Error ('test-bayesassurance.R:36:3'): Correct labels on x and y axes ────────
  <notSubsettableError/error/condition>
  Error in `out$assurance_plot$labels`: object of type 'object' is not subsettable
  Backtrace:
      ▆
   1. └─testthat::expect_identical(out$assurance_plot$labels$y, "Assurance") at test-bayesassurance.R:36:3
   2.   └─testthat::quasi_label(enquo(object), label, arg = "object")
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Failure ('test-frequentist.R:28:3'): Power plot output is a ggplot ──────────
  is.ggplot(out$pwr_plot) is not TRUE
  
  `actual`:   FALSE
  `expected`: TRUE 
  ── Error ('test-frequentist.R:36:3'): Correct labels on x and y axes ───────────
  <notSubsettableError/error/condition>
  Error in `out$pwr_plot$labels`: object of type 'object' is not subsettable
  Backtrace:
      ▆
   1. └─testthat::expect_identical(out$pwr_plot$labels$y, "Power") at test-frequentist.R:36:3
   2.   └─testthat::quasi_label(enquo(object), label, arg = "object")
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Failure ('test-pwr_curves.R:99:3'): Plot output is a ggplot ─────────────────
  is.ggplot(out$plot) is not TRUE
  
  `actual`:   FALSE
  `expected`: TRUE 
  ── Error ('test-pwr_curves.R:114:3'): Correct labels on x and y axes ───────────
  <notSubsettableError/error/condition>
  Error in `out$plot$labels`: object of type 'object' is not subsettable
  Backtrace:
      ▆
   1. └─testthat::expect_identical(out$plot$labels$y, "Power/Assurance") at test-pwr_curves.R:114:3
   2.   └─testthat::quasi_label(enquo(object), label, arg = "object")
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  
  [ FAIL 15 | WARN 92 | SKIP 0 | PASS 125 ]
  Error: Test failures
  Execution halted