Running 'spelling.R' [1s]
  Running 'testthat.R' [6s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(ijtiff)
  > 
  > test_check("ijtiff")
  -- 1. Error: `as_EBImage()` works (@test-as_EBImage-examples.R#5)  -------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_tif(system.file("img", "Rlogo.tif", package = "ijtiff")) at testthat/test-as_EBImage-examples.R:5
  2: path %<>% stringr::str_replace_all(stringr::coll("\\"), "/")
  3: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: eval(quote(`_fseq`(`_lhs`)), env, env)
  6: `_fseq`(`_lhs`)
  7: freduce(value, `_function_list`)
  8: withVisible(function_list[[k]](value))
  9: function_list[[k]](value)
  10: stringr::str_replace_all
  11: getExportedValue(pkg, name)
  12: asNamespace(ns)
  13: getNamespace(ns)
  14: tryCatch(loadNamespace(name), error = function(e) stop(e))
  15: tryCatchList(expr, classes, parentenv, handlers)
  16: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  17: value[[3L]](cond)
  
  -- 2. Error: `count_imgs()` works (@test-count_imgs-examples.R#4)  -------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: expect_equal(count_imgs(system.file("img", "Rlogo.tif", package = "ijtiff")), 1) at testthat/test-count_imgs-examples.R:4
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: count_imgs(system.file("img", "Rlogo.tif", package = "ijtiff"))
  5: path %<>% stringr::str_replace_all(stringr::coll("\\"), "/")
  6: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  7: eval(quote(`_fseq`(`_lhs`)), env, env)
  8: eval(quote(`_fseq`(`_lhs`)), env, env)
  9: `_fseq`(`_lhs`)
  10: freduce(value, `_function_list`)
  11: withVisible(function_list[[k]](value))
  12: function_list[[k]](value)
  13: stringr::str_replace_all
  14: getExportedValue(pkg, name)
  15: asNamespace(ns)
  16: getNamespace(ns)
  17: tryCatch(loadNamespace(name), error = function(e) stop(e))
  18: tryCatchList(expr, classes, parentenv, handlers)
  19: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  20: value[[3L]](cond)
  
  -- 3. Error: `read_tags()` works (@test-read_tags-examples.R#5)  ---------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_tags(path) at testthat/test-read_tags-examples.R:5
  2: path %<>% stringr::str_replace_all(stringr::coll("\\"), "/")
  3: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: eval(quote(`_fseq`(`_lhs`)), env, env)
  6: `_fseq`(`_lhs`)
  7: freduce(value, `_function_list`)
  8: withVisible(function_list[[k]](value))
  9: function_list[[k]](value)
  10: stringr::str_replace_all
  11: getExportedValue(pkg, name)
  12: asNamespace(ns)
  13: getNamespace(ns)
  14: tryCatch(loadNamespace(name), error = function(e) stop(e))
  15: tryCatchList(expr, classes, parentenv, handlers)
  16: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  17: value[[3L]](cond)
  
  -- 4. Error: display works (@test_graphics.R#4)  -------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_tif(system.file("img", "Rlogo.tif", package = "ijtiff")) at testthat/test_graphics.R:4
  2: path %<>% stringr::str_replace_all(stringr::coll("\\"), "/")
  3: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: eval(quote(`_fseq`(`_lhs`)), env, env)
  6: `_fseq`(`_lhs`)
  7: freduce(value, `_function_list`)
  8: withVisible(function_list[[k]](value))
  9: function_list[[k]](value)
  10: stringr::str_replace_all
  11: getExportedValue(pkg, name)
  12: asNamespace(ns)
  13: getNamespace(ns)
  14: tryCatch(loadNamespace(name), error = function(e) stop(e))
  15: tryCatchList(expr, classes, parentenv, handlers)
  16: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  17: value[[3L]](cond)
  
  -- 5. Error: Package 2-channel example I/O works (@test_io.R#4)  ---------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_tif(system.file("img", "2ch_ij.tif", package = "ijtiff")) at testthat/test_io.R:4
  2: path %<>% stringr::str_replace_all(stringr::coll("\\"), "/")
  3: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: eval(quote(`_fseq`(`_lhs`)), env, env)
  6: `_fseq`(`_lhs`)
  7: freduce(value, `_function_list`)
  8: withVisible(function_list[[k]](value))
  9: function_list[[k]](value)
  10: stringr::str_replace_all
  11: getExportedValue(pkg, name)
  12: asNamespace(ns)
  13: getNamespace(ns)
  14: tryCatch(loadNamespace(name), error = function(e) stop(e))
  15: tryCatchList(expr, classes, parentenv, handlers)
  16: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  17: value[[3L]](cond)
  
  -- 6. Error: Package RGB I/O works (@test_io.R#35)  ----------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_tif(system.file("img", "Rlogo.tif", package = "ijtiff")) at testthat/test_io.R:35
  2: path %<>% stringr::str_replace_all(stringr::coll("\\"), "/")
  3: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: eval(quote(`_fseq`(`_lhs`)), env, env)
  6: `_fseq`(`_lhs`)
  7: freduce(value, `_function_list`)
  8: withVisible(function_list[[k]](value))
  9: function_list[[k]](value)
  10: stringr::str_replace_all
  11: getExportedValue(pkg, name)
  12: asNamespace(ns)
  13: getNamespace(ns)
  14: tryCatch(loadNamespace(name), error = function(e) stop(e))
  15: tryCatchList(expr, classes, parentenv, handlers)
  16: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  17: value[[3L]](cond)
  
  -- 7. Error: 8-bit unsigned integer TIFF I/O works (@test_io.R#44)  ------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: tempfile(fileext = ".tif") %>% stringr::str_replace_all(stringr::coll("\\"), "/") at testthat/test_io.R:44
  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: stringr::str_replace_all
  10: getExportedValue(pkg, name)
  11: asNamespace(ns)
  12: getNamespace(ns)
  13: tryCatch(loadNamespace(name), error = function(e) stop(e))
  14: tryCatchList(expr, classes, parentenv, handlers)
  15: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  16: value[[3L]](cond)
  
  -- 8. Error: 16-bit unsigned integer TIFF I/O works (@test_io.R#57)  -----------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: tempfile(fileext = ".tif") %>% stringr::str_replace_all(stringr::coll("\\"), "/") at testthat/test_io.R:57
  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: stringr::str_replace_all
  10: getExportedValue(pkg, name)
  11: asNamespace(ns)
  12: getNamespace(ns)
  13: tryCatch(loadNamespace(name), error = function(e) stop(e))
  14: tryCatchList(expr, classes, parentenv, handlers)
  15: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  16: value[[3L]](cond)
  
  -- 9. Error: 32-bit unsigned integer TIFF I/O works (@test_io.R#70)  -----------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: tempfile(fileext = ".tif") %>% stringr::str_replace_all(stringr::coll("\\"), "/") at testthat/test_io.R:70
  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: stringr::str_replace_all
  10: getExportedValue(pkg, name)
  11: asNamespace(ns)
  12: getNamespace(ns)
  13: tryCatch(loadNamespace(name), error = function(e) stop(e))
  14: tryCatchList(expr, classes, parentenv, handlers)
  15: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  16: value[[3L]](cond)
  
  -- 10. Error: Float (real-numbered) TIFF I/O works (@test_io.R#86)  ------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: tempfile(fileext = ".tif") %>% stringr::str_replace_all(stringr::coll("\\"), "/") at testthat/test_io.R:86
  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: stringr::str_replace_all
  10: getExportedValue(pkg, name)
  11: asNamespace(ns)
  12: getNamespace(ns)
  13: tryCatch(loadNamespace(name), error = function(e) stop(e))
  14: tryCatchList(expr, classes, parentenv, handlers)
  15: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  16: value[[3L]](cond)
  
  -- 11. Error: Negative-numbered TIFF I/O works (@test_io.R#108)  ---------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: tempfile(fileext = ".tif") %>% stringr::str_replace_all(stringr::coll("\\"), "/") at testthat/test_io.R:108
  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: stringr::str_replace_all
  10: getExportedValue(pkg, name)
  11: asNamespace(ns)
  12: getNamespace(ns)
  13: tryCatch(loadNamespace(name), error = function(e) stop(e))
  14: tryCatchList(expr, classes, parentenv, handlers)
  15: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  16: value[[3L]](cond)
  
  -- 12. Error: List returning works (@test_io.R#122)  ---------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: tempfile(fileext = ".tif") %>% stringr::str_replace_all(stringr::coll("\\"), "/") at testthat/test_io.R:122
  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: stringr::str_replace_all
  10: getExportedValue(pkg, name)
  11: asNamespace(ns)
  12: getNamespace(ns)
  13: tryCatch(loadNamespace(name), error = function(e) stop(e))
  14: tryCatchList(expr, classes, parentenv, handlers)
  15: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  16: value[[3L]](cond)
  
  -- 13. Error: TIFFErrorHandler_ works (@test_io.R#139)  ------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: tempfile(fileext = ".txt") %>% stringr::str_replace_all(stringr::coll("\\"), "/") at testthat/test_io.R:139
  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: stringr::str_replace_all
  10: getExportedValue(pkg, name)
  11: asNamespace(ns)
  12: getNamespace(ns)
  13: tryCatch(loadNamespace(name), error = function(e) stop(e))
  14: tryCatchList(expr, classes, parentenv, handlers)
  15: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  16: value[[3L]](cond)
  
  -- 14. Failure: write_tif() errors correctly (@test_io.R#148)  -----------------
  `write_tif(aaaa, "a", bits_per_sample = "abc")` threw an error with unexpected message.
  Expected match: "If `bits_per_sample` is a string, then 'auto' is the only.?allowable value\\..?    \\* You have used 'abc'\\..?"
  Actual message: "ICU init failed: U_FILE_ACCESS_ERROR"
  
  -- 15. Failure: write_tif() errors correctly (@test_io.R#156)  -----------------
  `write_tif(aaaa, "a", bits_per_sample = 12)` threw an error with unexpected message.
  Expected match: "If specifying `bits_per_sample`, it must be one of 8, 16 or.?32\\..?    \\* You have used `bits_per_sample = 12`\\..?"
  Actual message: "ICU init failed: U_FILE_ACCESS_ERROR"
  
  -- 16. Failure: write_tif() errors correctly (@test_io.R#165)  -----------------
  `write_tif(aaaa, "a")` threw an error with unexpected message.
  Expected match: "The lowest allowable negative value in `img` is.?-3\\.40282346638529e\\+38\\..?    \\* The lowest value in your `img` is -6\\.80564693277058e\\+38\\..?    \\* The `write_txt_img\\(\\)` function allows you to write.?      images without restriction on the values therein\\..?"
  Actual message: "ICU init failed: U_FILE_ACCESS_ERROR"
  
  -- 17. Failure: write_tif() errors correctly (@test_io.R#177)  -----------------
  `write_tif(aaaa, "a")` threw an error with unexpected message.
  Expected match: "If `img` has negative values \\(which the input `img` does\\),.?then the maximum allowed positive value is.?3\\.40282346638529e\\+38\\..?    \\* The largest value in your `img` is 6.+e\\+38\\..?    \\* The `write_txt_img\\(\\)` function allows you to write.?      images without restriction on the values therein\\..?"
  Actual message: "ICU init failed: U_FILE_ACCESS_ERROR"
  
  -- 18. Failure: write_tif() errors correctly (@test_io.R#190)  -----------------
  `write_tif(aaaa, "a", bits_per_sample = 16)` threw an error with unexpected message.
  Expected match: "Your image needs to be written as floating point numbers \\(not.?integers\\)\\. For this, it is necessary to have 32 bits per.?sample\\..?    \\* You have selected 16 bits per sample\\..?"
  Actual message: "ICU init failed: U_FILE_ACCESS_ERROR"
  
  -- 19. Failure: write_tif() errors correctly (@test_io.R#200)  -----------------
  `write_tif(aaaa, "a", bits_per_sample = 16)` threw an error with unexpected message.
  Expected match: "The maximum value in 'img' is 8589934592 which is greater than.?2 \\^ 32 - 1 and therefore too high to be written to a TIFF.?file\\..?    \\* The `write_txt_img\\(\\)` function allows you to write.?      images without restriction on the values therein\\..?"
  Actual message: "ICU init failed: U_FILE_ACCESS_ERROR"
  
  -- 20. Failure: write_tif() errors correctly (@test_io.R#211)  -----------------
  `write_tif(aaaa, "a", bits_per_sample = 16)` threw an error with unexpected message.
  Expected match: "You are trying to write a 16-bit image, however the maximum.?element in `img` is 1048576, which is too big\\..?    \\* The largest allowable value in a 16-bit image is 65535\\..?    \\* To write your `img` to a TIFF file, you need at least 32.?      bits per sample\\..?"
  Actual message: "ICU init failed: U_FILE_ACCESS_ERROR"
  
  -- 21. Failure: write_tif() errors correctly (@test_io.R#221)  -----------------
  `read_tif(system.file("img", "bad_ij1.tif", package = "ijtiff"))` threw an error with unexpected message.
  Expected match: "The ImageJ-written image you're trying to read says in its TIFFTAG_DESCRIPTION that it has 13 images of 5 slices of 2 channels. However, with 5 slices of 2 channels, one would expect there to be 5x2=10 images. This discrepancy means that the 'ijtiff' package can't read your image correctly. One possible source of this kind of error is that your image is temporal and volumetric. 'ijtiff' can handle either time-based or volumetric stacks, but not both."
  Actual message: "ICU init failed: U_FILE_ACCESS_ERROR"
  
  -- 22. Failure: write_tif() errors correctly (@test_io.R#232)  -----------------
  `read_tif(system.file("img", "bad_ij2.tif", package = "ijtiff"))` threw an error with unexpected message.
  Expected match: "The ImageJ-written image you're trying to read says it has 8 frames AND 5 slices. To be read by the 'ijtiff' package, the number of slices OR the number of frames should be specified in the description tiff tag \\(and they're interpreted as the same thing\\), but not both."
  Actual message: "ICU init failed: U_FILE_ACCESS_ERROR"
  
  -- 23. Error: text-image-io works (@test_io.R#246)  ----------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: tempfile() %>% stringr::str_replace_all(stringr::coll("\\"), "/") at testthat/test_io.R:246
  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: stringr::str_replace_all
  10: getExportedValue(pkg, name)
  11: asNamespace(ns)
  12: getNamespace(ns)
  13: tryCatch(loadNamespace(name), error = function(e) stop(e))
  14: tryCatchList(expr, classes, parentenv, handlers)
  15: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  16: value[[3L]](cond)
  
  -- 24. Error: extract_desired_plane() works (@test_utils.R#5)  -----------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: expect_equal(extract_desired_plane(aaa), aaa[, , 1]) at testthat/test_utils.R:5
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: extract_desired_plane(aaa)
  5: purrr::map_lgl(seq_len(d[3]), ~filesstrings::all_equal(arr[, , .], 0))
  6: .f(.x[[i]], ...)
  7: filesstrings::all_equal
  8: getExportedValue(pkg, name)
  9: asNamespace(ns)
  10: getNamespace(ns)
  11: tryCatch(loadNamespace(name), error = function(e) stop(e))
  12: tryCatchList(expr, classes, parentenv, handlers)
  13: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  14: value[[3L]](cond)
  
  == testthat results  ===========================================================
  OK: 8 SKIPPED: 0 FAILED: 24
  1. Error: `as_EBImage()` works (@test-as_EBImage-examples.R#5) 
  2. Error: `count_imgs()` works (@test-count_imgs-examples.R#4) 
  3. Error: `read_tags()` works (@test-read_tags-examples.R#5) 
  4. Error: display works (@test_graphics.R#4) 
  5. Error: Package 2-channel example I/O works (@test_io.R#4) 
  6. Error: Package RGB I/O works (@test_io.R#35) 
  7. Error: 8-bit unsigned integer TIFF I/O works (@test_io.R#44) 
  8. Error: 16-bit unsigned integer TIFF I/O works (@test_io.R#57) 
  9. Error: 32-bit unsigned integer TIFF I/O works (@test_io.R#70) 
  1. ...
  
  Error: testthat unit tests failed
  Execution halted