Running 'testthat.R' [2s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(striprtf)
  > 
  > test_check("striprtf")
  -- 1. Error: basic (@test-read.R#11)  ------------------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_rtf("msword.rtf") at testthat/test-read.R:11
  2: readLines(file, warn = FALSE, ...) %>% paste0(collapse = "\n") %>% strip_rtf(verbose, 
         row_start, row_end, cell_end, ignore_tables)
  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: strip_rtf(., verbose, row_start, row_end, cell_end, ignore_tables)
  11: stringr::str_match
  12: getExportedValue(pkg, name)
  13: asNamespace(ns)
  14: getNamespace(ns)
  15: tryCatch(loadNamespace(name), error = function(e) stop(e))
  16: tryCatchList(expr, classes, parentenv, handlers)
  17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  18: value[[3L]](cond)
  
  -- 2. Error: big (@test-read.R#18)  --------------------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_rtf("big.rtf") at testthat/test-read.R:18
  2: readLines(file, warn = FALSE, ...) %>% paste0(collapse = "\n") %>% strip_rtf(verbose, 
         row_start, row_end, cell_end, ignore_tables)
  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: strip_rtf(., verbose, row_start, row_end, cell_end, ignore_tables)
  11: stringr::str_match
  12: getExportedValue(pkg, name)
  13: asNamespace(ns)
  14: getNamespace(ns)
  15: tryCatch(loadNamespace(name), error = function(e) stop(e))
  16: tryCatchList(expr, classes, parentenv, handlers)
  17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  18: value[[3L]](cond)
  
  -- 3. Error: libre (@test-read.R#25)  ------------------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_rtf("libre.rtf") at testthat/test-read.R:25
  2: readLines(file, warn = FALSE, ...) %>% paste0(collapse = "\n") %>% strip_rtf(verbose, 
         row_start, row_end, cell_end, ignore_tables)
  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: strip_rtf(., verbose, row_start, row_end, cell_end, ignore_tables)
  11: stringr::str_match
  12: getExportedValue(pkg, name)
  13: asNamespace(ns)
  14: getNamespace(ns)
  15: tryCatch(loadNamespace(name), error = function(e) stop(e))
  16: tryCatchList(expr, classes, parentenv, handlers)
  17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  18: value[[3L]](cond)
  
  -- 4. Error: abiword (@test-read.R#35)  ----------------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_rtf("abiword.rtf") at testthat/test-read.R:35
  2: readLines(file, warn = FALSE, ...) %>% paste0(collapse = "\n") %>% strip_rtf(verbose, 
         row_start, row_end, cell_end, ignore_tables)
  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: strip_rtf(., verbose, row_start, row_end, cell_end, ignore_tables)
  11: stringr::str_match
  12: getExportedValue(pkg, name)
  13: asNamespace(ns)
  14: getNamespace(ns)
  15: tryCatch(loadNamespace(name), error = function(e) stop(e))
  16: tryCatchList(expr, classes, parentenv, handlers)
  17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  18: value[[3L]](cond)
  
  -- 5. Error: Japanese (cp932) (@test-read.R#45)  -------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_rtf("cp932.rtf") at testthat/test-read.R:45
  2: readLines(file, warn = FALSE, ...) %>% paste0(collapse = "\n") %>% strip_rtf(verbose, 
         row_start, row_end, cell_end, ignore_tables)
  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: strip_rtf(., verbose, row_start, row_end, cell_end, ignore_tables)
  11: stringr::str_match
  12: getExportedValue(pkg, name)
  13: asNamespace(ns)
  14: getNamespace(ns)
  15: tryCatch(loadNamespace(name), error = function(e) stop(e))
  16: tryCatchList(expr, classes, parentenv, handlers)
  17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  18: value[[3L]](cond)
  
  -- 6. Error: Chinese and Korean (@test-read.R#55)  -----------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_rtf("eastasia.rtf") at testthat/test-read.R:55
  2: readLines(file, warn = FALSE, ...) %>% paste0(collapse = "\n") %>% strip_rtf(verbose, 
         row_start, row_end, cell_end, ignore_tables)
  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: strip_rtf(., verbose, row_start, row_end, cell_end, ignore_tables)
  11: stringr::str_match
  12: getExportedValue(pkg, name)
  13: asNamespace(ns)
  14: getNamespace(ns)
  15: tryCatch(loadNamespace(name), error = function(e) stop(e))
  16: tryCatchList(expr, classes, parentenv, handlers)
  17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  18: value[[3L]](cond)
  
  -- 7. Error: Special characters (@test-read.R#65)  -----------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_rtf("special-chars.rtf") at testthat/test-read.R:65
  2: readLines(file, warn = FALSE, ...) %>% paste0(collapse = "\n") %>% strip_rtf(verbose, 
         row_start, row_end, cell_end, ignore_tables)
  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: strip_rtf(., verbose, row_start, row_end, cell_end, ignore_tables)
  11: stringr::str_match
  12: getExportedValue(pkg, name)
  13: asNamespace(ns)
  14: getNamespace(ns)
  15: tryCatch(loadNamespace(name), error = function(e) stop(e))
  16: tryCatchList(expr, classes, parentenv, handlers)
  17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  18: value[[3L]](cond)
  
  -- 8. Error: Office for Mac (@test-read.R#78)  ---------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_rtf("mac.rtf") at testthat/test-read.R:78
  2: readLines(file, warn = FALSE, ...) %>% paste0(collapse = "\n") %>% strip_rtf(verbose, 
         row_start, row_end, cell_end, ignore_tables)
  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: strip_rtf(., verbose, row_start, row_end, cell_end, ignore_tables)
  11: stringr::str_match
  12: getExportedValue(pkg, name)
  13: asNamespace(ns)
  14: getNamespace(ns)
  15: tryCatch(loadNamespace(name), error = function(e) stop(e))
  16: tryCatchList(expr, classes, parentenv, handlers)
  17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  18: value[[3L]](cond)
  
  -- 9. Error: Europe (@test-read.R#88)  -----------------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_rtf("europe.rtf") at testthat/test-read.R:88
  2: readLines(file, warn = FALSE, ...) %>% paste0(collapse = "\n") %>% strip_rtf(verbose, 
         row_start, row_end, cell_end, ignore_tables)
  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: strip_rtf(., verbose, row_start, row_end, cell_end, ignore_tables)
  11: stringr::str_match
  12: getExportedValue(pkg, name)
  13: asNamespace(ns)
  14: getNamespace(ns)
  15: tryCatch(loadNamespace(name), error = function(e) stop(e))
  16: tryCatchList(expr, classes, parentenv, handlers)
  17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  18: value[[3L]](cond)
  
  -- 10. Error: basic (@test-strip.R#11)  ----------------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: readLines("msword.rtf", warn = FALSE) %>% strip_rtf() at testthat/test-strip.R:11
  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: strip_rtf(.)
  10: stringr::str_match
  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)
  
  -- 11. Error: big (@test-strip.R#18)  ------------------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: readLines("big.rtf", warn = FALSE) %>% strip_rtf() at testthat/test-strip.R:18
  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: strip_rtf(.)
  10: stringr::str_match
  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)
  
  -- 12. Error: libre (@test-strip.R#25)  ----------------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: readLines("libre.rtf", warn = FALSE) %>% strip_rtf() at testthat/test-strip.R:25
  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: strip_rtf(.)
  10: stringr::str_match
  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)
  
  -- 13. Error: abiword (@test-strip.R#35)  --------------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: readLines("abiword.rtf", warn = FALSE) %>% strip_rtf() at testthat/test-strip.R:35
  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: strip_rtf(.)
  10: stringr::str_match
  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)
  
  -- 14. Error: Japanese (cp932) (@test-strip.R#45)  -----------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: readLines("cp932.rtf", warn = FALSE) %>% strip_rtf() at testthat/test-strip.R:45
  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: strip_rtf(.)
  10: stringr::str_match
  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)
  
  -- 15. Error: Chinese and Korean (@test-strip.R#55)  ---------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: readLines("eastasia.rtf", warn = FALSE) %>% strip_rtf() at testthat/test-strip.R:55
  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: strip_rtf(.)
  10: stringr::str_match
  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)
  
  -- 16. Error: Europe (@test-strip.R#65)  ---------------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: readLines("europe.rtf", warn = FALSE) %>% strip_rtf() at testthat/test-strip.R:65
  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: strip_rtf(.)
  10: stringr::str_match
  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)
  
  -- 17. Error: basic table (@test-table.R#11)  ----------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_rtf("table.rtf", row_start = "**", row_end = "**", cell_end = "|") at testthat/test-table.R:11
  2: readLines(file, warn = FALSE, ...) %>% paste0(collapse = "\n") %>% strip_rtf(verbose, 
         row_start, row_end, cell_end, ignore_tables)
  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: strip_rtf(., verbose, row_start, row_end, cell_end, ignore_tables)
  11: stringr::str_match
  12: getExportedValue(pkg, name)
  13: asNamespace(ns)
  14: getNamespace(ns)
  15: tryCatch(loadNamespace(name), error = function(e) stop(e))
  16: tryCatchList(expr, classes, parentenv, handlers)
  17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  18: value[[3L]](cond)
  
  -- 18. Error: table with special chars (@test-table.R#27)  ---------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_rtf("table-specialchars.rtf", row_start = "<tr>", row_end = "</tr>", cell_end = ",") at testthat/test-table.R:27
  2: readLines(file, warn = FALSE, ...) %>% paste0(collapse = "\n") %>% strip_rtf(verbose, 
         row_start, row_end, cell_end, ignore_tables)
  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: strip_rtf(., verbose, row_start, row_end, cell_end, ignore_tables)
  11: stringr::str_match
  12: getExportedValue(pkg, name)
  13: asNamespace(ns)
  14: getNamespace(ns)
  15: tryCatch(loadNamespace(name), error = function(e) stop(e))
  16: tryCatchList(expr, classes, parentenv, handlers)
  17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  18: value[[3L]](cond)
  
  -- 19. Error: multiple tables (@test-table.R#43)  ------------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_rtf("table-multi.rtf", row_start = "*|") at testthat/test-table.R:43
  2: readLines(file, warn = FALSE, ...) %>% paste0(collapse = "\n") %>% strip_rtf(verbose, 
         row_start, row_end, cell_end, ignore_tables)
  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: strip_rtf(., verbose, row_start, row_end, cell_end, ignore_tables)
  11: stringr::str_match
  12: getExportedValue(pkg, name)
  13: asNamespace(ns)
  14: getNamespace(ns)
  15: tryCatch(loadNamespace(name), error = function(e) stop(e))
  16: tryCatchList(expr, classes, parentenv, handlers)
  17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  18: value[[3L]](cond)
  
  -- 20. Error: big file with many tables (@test-table.R#61)  --------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: read_rtf("big-with-table.rtf", row_start = "***") at testthat/test-table.R:61
  2: readLines(file, warn = FALSE, ...) %>% paste0(collapse = "\n") %>% strip_rtf(verbose, 
         row_start, row_end, cell_end, ignore_tables)
  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: strip_rtf(., verbose, row_start, row_end, cell_end, ignore_tables)
  11: stringr::str_match
  12: getExportedValue(pkg, name)
  13: asNamespace(ns)
  14: getNamespace(ns)
  15: tryCatch(loadNamespace(name), error = function(e) stop(e))
  16: tryCatchList(expr, classes, parentenv, handlers)
  17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  18: value[[3L]](cond)
  
  == testthat results  ===========================================================
  OK: 0 SKIPPED: 0 FAILED: 20
  1. Error: basic (@test-read.R#11) 
  2. Error: big (@test-read.R#18) 
  3. Error: libre (@test-read.R#25) 
  4. Error: abiword (@test-read.R#35) 
  5. Error: Japanese (cp932) (@test-read.R#45) 
  6. Error: Chinese and Korean (@test-read.R#55) 
  7. Error: Special characters (@test-read.R#65) 
  8. Error: Office for Mac (@test-read.R#78) 
  9. Error: Europe (@test-read.R#88) 
  1. ...
  
  Error: testthat unit tests failed
  Execution halted