Running 'spelling.R' [0s]
  Running 'testthat.R' [2s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(detrendr)
  > 
  > test_check("detrendr")
  -- 1. Error: best_tau works (@test-best_params.R#5)  ---------------------------
  could not find function "intmat_list_bind_nth_rows"
  1: ijtiff::read_tif(system.file("extdata", "bleached.tif", package = "detrendr"), msg = FALSE) at testthat/test-best_params.R:5
  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)
  
  -- 2. Error: best_l works (@test-best_params.R#41)  ----------------------------
  could not find function "intmat_list_bind_nth_rows"
  1: ijtiff::read_tif(system.file("extdata", "bleached.tif", package = "detrendr"), msg = FALSE) at testthat/test-best_params.R:41
  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: best_degree works (@test-best_params.R#82)  -----------------------
  could not find function "intmat_list_bind_nth_rows"
  1: ijtiff::read_tif(system.file("extdata", "bleached.tif", package = "detrendr"), msg = FALSE) at testthat/test-best_params.R:82
  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)
  
  -- 4. Error: best_swaps() works (@test-best_params.R#114)  ---------------------
  could not find function "intmat_list_bind_nth_rows"
  1: ijtiff::read_tif(system.file("extdata", "bleached.tif", package = "detrendr")) at testthat/test-best_params.R:114
  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)
  
  -- 5. Error: detrending works (@test-detrend.R#3)  -----------------------------
  could not find function "intmat_list_bind_nth_rows"
  1: ijtiff::read_tif(system.file("extdata", "bleached.tif", package = "detrendr"), msg = FALSE) at testthat/test-detrend.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)
  
  -- 6. Error: detrending errors correctly (@test-detrend.R#170)  ----------------
  could not find function "intmat_list_bind_nth_rows"
  1: ijtiff::read_tif(system.file("extdata", "bleached.tif", package = "detrendr"), msg = FALSE) at testthat/test-detrend.R:170
  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)
  
  -- 7. Error: detrending entire derectories works (@test-dir_detrend.R#11)  -----
  could not find function "intmat_list_bind_nth_rows"
  1: purrr::map(orig_files, ijtiff::read_tif, msg = FALSE) at testthat/test-dir_detrend.R:11
  2: .f(.x[[i]], ...)
  3: filesstrings::str_before_last(path, "/")
  4: str_before_nth(strings = strings, pattern = pattern, n = -1)
  5: str_nth_instance_indices(strings, pattern, n)
  6: intmat_list_bind_nth_rows(instances, n - 1) %>% magrittr::set_colnames(c("start", 
         "end"))
  7: eval(lhs, parent, parent)
  8: eval(lhs, parent, parent)
  
  -- 8. Error: file_detrend() deals with other directories correctly (@test-dir_de
  could not find function "intmat_list_bind_nth_rows"
  1: file_detrend("tempwithintemp/bleached.tif", method = "exp", parameter = 5, purpose = "ff") at testthat/test-dir_detrend.R:176
  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)
  
  -- 9. Error: sum_pillars() and mean_pillars() work (@test-utils.R#20)  ---------
  could not find function "intmat_list_bind_nth_rows"
  1: system.file("extdata", "bleached.tif", package = "detrendr") %>% ijtiff::read_tif(msg = FALSE) at testthat/test-utils.R:20
  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(., msg = FALSE)
  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)
  
  -- 10. Error: sum_frames() and mean_frames() work (@test-utils.R#26)  ----------
  could not find function "intmat_list_bind_nth_rows"
  1: system.file("extdata", "bleached.tif", package = "detrendr") %>% ijtiff::read_tif(msg = FALSE) %>% 
         {
             .[, , 1, ]
         } at testthat/test-utils.R:26
  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(., msg = FALSE)
  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)
  
  -- 11. Error: brightness_cols_given_mean() works (@test-utils.R#40)  -----------
  could not find function "intmat_list_bind_nth_rows"
  1: system.file("extdata", "bleached.tif", package = "detrendr") %>% ijtiff::read_tif(msg = FALSE) %>% 
         {
             .[, , 1, 1]
         } at testthat/test-utils.R:40
  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(., msg = FALSE)
  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)
  
  -- 12. Error: var_cols_given_mean() works (@test-utils.R#54)  ------------------
  could not find function "intmat_list_bind_nth_rows"
  1: system.file("extdata", "bleached.tif", package = "detrendr") %>% ijtiff::read_tif(msg = FALSE) %>% 
         {
             .[, , 1, 1]
         } at testthat/test-utils.R:54
  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(., msg = FALSE)
  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)
  
  -- 13. Error: var_rows_given_mean() works (@test-utils.R#68)  ------------------
  could not find function "intmat_list_bind_nth_rows"
  1: system.file("extdata", "bleached.tif", package = "detrendr") %>% ijtiff::read_tif(msg = FALSE) %>% 
         {
             .[, , 1, 1]
         } at testthat/test-utils.R:68
  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(., msg = FALSE)
  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)
  
  -- 14. Error: rboxes derivatives error correctly (@test-utils.R#87)  -----------
  could not find function "intmat_list_bind_nth_rows"
  1: system.file("extdata", "bleached.tif", package = "detrendr") %>% ijtiff::read_tif(msg = FALSE) %>% 
         {
             .[, , 1, ]
         } at testthat/test-utils.R:87
  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(., msg = FALSE)
  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: 46 SKIPPED: 0 WARNINGS: 1 FAILED: 14
  1. Error: best_tau works (@test-best_params.R#5) 
  2. Error: best_l works (@test-best_params.R#41) 
  3. Error: best_degree works (@test-best_params.R#82) 
  4. Error: best_swaps() works (@test-best_params.R#114) 
  5. Error: detrending works (@test-detrend.R#3) 
  6. Error: detrending errors correctly (@test-detrend.R#170) 
  7. Error: detrending entire derectories works (@test-dir_detrend.R#11) 
  8. Error: file_detrend() deals with other directories correctly (@test-dir_detrend.R#176) 
  9. Error: sum_pillars() and mean_pillars() work (@test-utils.R#20) 
  1. ...
  
  Error: testthat unit tests failed
  Execution halted