Running 'testthat.R' [2s]
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)  ------------------------
  could not find function "intmat_list_bind_nth_rows"
  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: filesstrings::str_before_last(path, "/")
  11: str_before_nth(strings = strings, pattern = pattern, n = -1)
  12: str_nth_instance_indices(strings, pattern, n)
  13: intmat_list_bind_nth_rows(instances, n - 1) %>% magrittr::set_colnames(c("start", 
         "end"))
  14: eval(lhs, parent, parent)
  15: eval(lhs, parent, parent)
  
  -- 2. Error: mean_stack_thresh works (@test_stack_thresh.R#3)  -----------------
  could not find function "intmat_list_bind_nth_rows"
  1: ijtiff::read_tif(system.file("extdata", "50.tif", package = "autothresholdr")) at testthat/test_stack_thresh.R:3
  2: filesstrings::str_before_last(path, "/")
  3: str_before_nth(strings = strings, pattern = pattern, n = -1)
  4: str_nth_instance_indices(strings, pattern, n)
  5: intmat_list_bind_nth_rows(instances, n - 1) %>% magrittr::set_colnames(c("start", 
         "end"))
  6: eval(lhs, parent, parent)
  7: eval(lhs, parent, parent)
  
  -- 3. Error: auto_thresh works (@test_thresh.R#4)  -----------------------------
  could not find function "intmat_list_bind_nth_rows"
  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: filesstrings::str_before_last(path, "/")
  11: str_before_nth(strings = strings, pattern = pattern, n = -1)
  12: str_nth_instance_indices(strings, pattern, n)
  13: intmat_list_bind_nth_rows(instances, n - 1) %>% magrittr::set_colnames(c("start", 
         "end"))
  14: eval(lhs, parent, parent)
  15: eval(lhs, parent, parent)
  
  -- 4. Error: auto_thresh works with matrices (@test_thresh.R#53)  --------------
  could not find function "intmat_list_bind_nth_rows"
  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: filesstrings::str_before_last(path, "/")
  10: str_before_nth(strings = strings, pattern = pattern, n = -1)
  11: str_nth_instance_indices(strings, pattern, n)
  12: intmat_list_bind_nth_rows(instances, n - 1) %>% magrittr::set_colnames(c("start", 
         "end"))
  13: eval(lhs, parent, parent)
  14: eval(lhs, parent, parent)
  
  == testthat results  ===========================================================
  OK: 6 SKIPPED: 1 WARNINGS: 0 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