Running ‘testthat.R’
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(detourr)
  > 
  > test_check("detourr")
  Saving _problems/test-show_scatter-7.R
  Saving _problems/test-show_scatter-50.R
  Saving _problems/test-show_scatter-109.R
  [ FAIL 3 | WARN 0 | SKIP 0 | PASS 7 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-show_scatter.R:5:3'): axes work ────────────────────────────────
  Error in `unclass(x)[i, j, k, drop = FALSE]`: incorrect number of dimensions
  Backtrace:
      ▆
   1. ├─detourr::show_scatter(...) at test-show_scatter.R:5:3
   2. │ └─detourr:::show_scatter_internal(...)
   3. │   └─detourr::is_detour(x)
   4. └─detourr::tour_path(...)
   5.   └─purrr::array_branch(projection_matrices, 3)
   6.     └─base::apply(array, margin, list)
   7.       ├─base::array(newX[, i], d.call, dn.call)
   8.       ├─newX[, i]
   9.       └─tourr:::`[.history_array`(newX, , i)
  ── Error ('test-show_scatter.R:48:3'): colours work ────────────────────────────
  Error in `unclass(x)[i, j, k, drop = FALSE]`: incorrect number of dimensions
  Backtrace:
      ▆
   1. ├─detourr::show_scatter(...) at test-show_scatter.R:48:3
   2. │ └─detourr:::show_scatter_internal(...)
   3. │   └─detourr::is_detour(x)
   4. └─detourr::tour_path(...)
   5.   └─purrr::array_branch(projection_matrices, 3)
   6.     └─base::apply(array, margin, list)
   7.       ├─base::array(newX[, i], d.call, dn.call)
   8.       ├─newX[, i]
   9.       └─tourr:::`[.history_array`(newX, , i)
  ── Error ('test-show_scatter.R:107:3'): labels work ────────────────────────────
  Error in `unclass(x)[i, j, k, drop = FALSE]`: incorrect number of dimensions
  Backtrace:
      ▆
   1. ├─detourr::show_scatter(...) at test-show_scatter.R:107:3
   2. │ └─detourr:::show_scatter_internal(...)
   3. │   └─detourr::is_detour(x)
   4. └─detourr::tour_path(...)
   5.   └─purrr::array_branch(projection_matrices, 3)
   6.     └─base::apply(array, margin, list)
   7.       ├─base::array(newX[, i], d.call, dn.call)
   8.       ├─newX[, i]
   9.       └─tourr:::`[.history_array`(newX, , i)
  
  [ FAIL 3 | WARN 0 | SKIP 0 | PASS 7 ]
  Error:
  ! Test failures.
  Execution halted