Running ‘testthat.R’
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(autothresholdr)
  > 
  > test_check("autothresholdr")
  ── 1. Error: (unknown) (@test_auto_thresh_methods.R#3)  ────────────────────────
  STRING_ELT() can only be applied to a 'character vector', not a 'raw'
  1: system.file("extdata", "eg.tif", package = "autothresholdr") %>% ijtiff::read_tif() at testthat/test_auto_thresh_methods.R:3
  2: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  3: eval(quote(`_fseq`(`_lhs`)), env, env)
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: `_fseq`(`_lhs`)
  6: freduce(value, `_function_list`)
  7: withVisible(function_list[[k]](value))
  8: function_list[[k]](value)
  9: ijtiff::read_tif(.)
  10: checkmate::assert_file_exists(path)
  11: checkFileExists(x, access, extension)
  12: qtest(x, "S+")
  
  ── 2. Error: mean_stack_thresh works (@test_stack_thresh.R#3)  ─────────────────
  STRING_ELT() can only be applied to a 'character vector', not a 'symbol'
  1: ijtiff::read_tif(system.file("extdata", "50.tif", package = "autothresholdr")) at testthat/test_stack_thresh.R:3
  2: checkmate::assert_file_exists(path)
  3: checkFileExists(x, access, extension)
  4: qtest(x, "S+")
  
  ── 3. Error: auto_thresh works (@test_thresh.R#4)  ─────────────────────────────
  STRING_ELT() can only be applied to a 'character vector', not a 'symbol'
  1: system.file("extdata", "eg.tif", package = "autothresholdr") %>% ijtiff::read_tif() at testthat/test_thresh.R:4
  2: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  3: eval(quote(`_fseq`(`_lhs`)), env, env)
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: `_fseq`(`_lhs`)
  6: freduce(value, `_function_list`)
  7: withVisible(function_list[[k]](value))
  8: function_list[[k]](value)
  9: ijtiff::read_tif(.)
  10: checkmate::assert_file_exists(path)
  11: checkFileExists(x, access, extension)
  12: qtest(x, "S+")
  
  ── 4. Error: auto_thresh works with matrices (@test_thresh.R#53)  ──────────────
  STRING_ELT() can only be applied to a 'character vector', not a 'symbol'
  1: system.file("extdata", "eg.tif", package = "autothresholdr") %>% ijtiff::read_tif() %>% 
         {
             .[, , 1, 1]
         } at testthat/test_thresh.R:53
  2: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  3: eval(quote(`_fseq`(`_lhs`)), env, env)
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: `_fseq`(`_lhs`)
  6: freduce(value, `_function_list`)
  7: function_list[[i]](value)
  8: ijtiff::read_tif(.)
  9: checkmate::assert_file_exists(path)
  10: checkFileExists(x, access, extension)
  11: qtest(x, "S+")
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 6 SKIPPED: 1 FAILED: 4
  1. Error: (unknown) (@test_auto_thresh_methods.R#3) 
  2. Error: mean_stack_thresh works (@test_stack_thresh.R#3) 
  3. Error: auto_thresh works (@test_thresh.R#4) 
  4. Error: auto_thresh works with matrices (@test_thresh.R#53) 
  
  Error: testthat unit tests failed
  Execution halted