Running ‘testthat.R’ [8s/19s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(distances)
  > 
  > test_check("distances")
  Saving _problems/test_input_check-47.R
  Saving _problems/test_input_check-70.R
  Saving _problems/test_input_check-86.R
  Saving _problems/test_input_check-123.R
  Saving _problems/test_input_check-164.R
  Saving _problems/test_input_check-251.R
  Saving _problems/test_input_check-275.R
  Saving _problems/test_input_check-302.R
  [ FAIL 8 | WARN 0 | SKIP 0 | PASS 419 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_input_check.R:45:3'): `new_error` & `new_warning` make warnings and errors. ──
  Error in `expect_error(t_new_error("This is an error."), class = c("error", "condition"), regexp = "This is an error.")`: `class` must be a single string or `NULL`, not a character vector.
  Backtrace:
      ▆
   1. └─testthat::expect_error(class = c("error", "condition")) at test_input_check.R:45:3
   2.   └─testthat:::check_string(class, allow_null = TRUE)
   3.     └─testthat:::stop_input_type(...)
   4.       └─rlang::abort(message, ..., call = call, arg = arg)
  ── Error ('test_input_check.R:68:3'): `ensure_distances` checks input. ─────────
  Error in `expect_error(t_ensure_distances(t_distances = "a"), class = c("error", "condition"), regexp = "`t_distances` is not a `distances` object.")`: `class` must be a single string or `NULL`, not a character vector.
  Backtrace:
      ▆
   1. └─testthat::expect_error(class = c("error", "condition")) at test_input_check.R:68:3
   2.   └─testthat:::check_string(class, allow_null = TRUE)
   3.     └─testthat:::stop_input_type(...)
   4.       └─rlang::abort(message, ..., call = call, arg = arg)
  ── Error ('test_input_check.R:85:3'): `coerce_args` checks input. ──────────────
  Error in `expect_error(t_coerce_args(t_choices = 1L), class = c("error", "condition"))`: `class` must be a single string or `NULL`, not a character vector.
  Backtrace:
      ▆
   1. └─testthat::expect_error(class = c("error", "condition")) at test_input_check.R:85:3
   2.   └─testthat:::check_string(class, allow_null = TRUE)
   3.     └─testthat:::stop_input_type(...)
   4.       └─rlang::abort(message, ..., call = call, arg = arg)
  ── Error ('test_input_check.R:121:3'): `coerce_character` checks input. ────────
  Error in `expect_error(t_coerce_character(t_req_length = 8), class = c("error", "condition"), regexp = "`t_x` is not of length `t_req_length`.")`: `class` must be a single string or `NULL`, not a character vector.
  Backtrace:
      ▆
   1. └─testthat::expect_error(class = c("error", "condition")) at test_input_check.R:121:3
   2.   └─testthat:::check_string(class, allow_null = TRUE)
   3.     └─testthat:::stop_input_type(...)
   4.       └─rlang::abort(message, ..., call = call, arg = arg)
  ── Error ('test_input_check.R:162:3'): `coerce_distance_data` checks input. ────
  Error in `expect_error(t_coerce_distance_data(t_data = dist(1:10)), class = c("error", "condition"), regexp = "`t_data` must be vector, matrix or data frame.")`: `class` must be a single string or `NULL`, not a character vector.
  Backtrace:
      ▆
   1. └─testthat::expect_error(class = c("error", "condition")) at test_input_check.R:162:3
   2.   └─testthat:::check_string(class, allow_null = TRUE)
   3.     └─testthat:::stop_input_type(...)
   4.       └─rlang::abort(message, ..., call = call, arg = arg)
  ── Error ('test_input_check.R:249:3'): `coerce_double` checks input. ───────────
  Error in `expect_error(t_coerce_double(t_x = letters[1:10]), class = c("error", "condition"), regexp = "`t_x` must be double or NULL.")`: `class` must be a single string or `NULL`, not a character vector.
  Backtrace:
      ▆
   1. └─testthat::expect_error(class = c("error", "condition")) at test_input_check.R:249:3
   2.   └─testthat:::check_string(class, allow_null = TRUE)
   3.     └─testthat:::stop_input_type(...)
   4.       └─rlang::abort(message, ..., call = call, arg = arg)
  ── Error ('test_input_check.R:273:3'): `coerce_integer` checks input. ──────────
  Error in `expect_error(t_coerce_integer(t_x = letters[1:10]), class = c("error", "condition"), regexp = "`t_x` must be integer or NULL.")`: `class` must be a single string or `NULL`, not a character vector.
  Backtrace:
      ▆
   1. └─testthat::expect_error(class = c("error", "condition")) at test_input_check.R:273:3
   2.   └─testthat:::check_string(class, allow_null = TRUE)
   3.     └─testthat:::stop_input_type(...)
   4.       └─rlang::abort(message, ..., call = call, arg = arg)
  ── Error ('test_input_check.R:300:3'): `coerce_norm_matrix` checks input. ──────
  Error in `expect_error(t_coerce_norm_matrix(t_mat = dist(1:4)), class = c("error", "condition"), regexp = "`t_mat` must be matrix, data.frame or vector.")`: `class` must be a single string or `NULL`, not a character vector.
  Backtrace:
      ▆
   1. └─testthat::expect_error(class = c("error", "condition")) at test_input_check.R:300:3
   2.   └─testthat:::check_string(class, allow_null = TRUE)
   3.     └─testthat:::stop_input_type(...)
   4.       └─rlang::abort(message, ..., call = call, arg = arg)
  
  [ FAIL 8 | WARN 0 | SKIP 0 | PASS 419 ]
  Error:
  ! Test failures.
  Execution halted