Running 'testthat.R' [26s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(magrittr)
  
  Attaching package: 'magrittr'
  
  The following objects are masked from 'package:testthat':
  
      equals, is_less_than, not
  
  > ##
  > library(dmdScheme)
  
  #############################################
  The cache will be in a temporary location and be deleted when you quit R.
  It is located at
     D:\temp\RtmpOAV47t\dmdScheme_1b200596583f
  To make it permanent, call
     cache(createPermanent = TRUE)
  and restart R
  and a permanent cache will be created which will survive restarts.
  #############################################
  
  
  trying URL 'https://github.com/Exp-Micro-Ecol-Hub/dmdSchemeRepository/raw/master/schemes/dmdScheme_0.9.9.tar.gz'
  Content type 'application/octet-stream' length 39383 bytes (38 KB)
  ==================================================
  downloaded 38 KB
  
  Scheme definition `D:\temp\RtmpOAV47t\file1b2007c93795d/dmdScheme_0.9.9.tar.gz, installed with
  name:    dmdScheme
  version: 0.9.9
  Theme switched to dmdScheme_0.9.9
  > ##
  > test_check("dmdScheme")
  [ FAIL 6 | WARN 0 | SKIP 8 | PASS 40 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • Does fail in covr testing but not in testing! (1)
  • On Windows (7)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-08-validate.R:23:5): validata_raw() returns correct value when correct ──
  Error in `nchar(xs)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─testthat::expect_known_value(...) at test-08-validate.R:23:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─dmdScheme::validate(x = scheme_path_xlsx(), errorIfStructFalse = TRUE)
    5. ├─dmdScheme:::validate.character(x = scheme_path_xlsx(), errorIfStructFalse = TRUE)
    6. │ └─dmdScheme::read_excel(...)
    7. │   └─dmdScheme::read_excel_raw(file = file, verbose = verbose, checkVersion = TRUE)
    8. │     └─base::lapply(...)
    9. │       └─dmdScheme (local) FUN(X[[i]], ...)
   10. │         ├─... %>% as.data.frame(stringsAsFactors = FALSE)
   11. │         ├─base::suppressMessages(...)
   12. │         │ └─base::withCallingHandlers(...)
   13. │         └─readxl::read_excel(...)
   14. │           └─readxl:::read_excel_(...)
   15. │             └─readxl:::set_readxl_names(...)
   16. │               ├─tibble::as_tibble(l, .name_repair = .name_repair)
   17. │               └─tibble:::as_tibble.list(l, .name_repair = .name_repair)
   18. │                 └─tibble:::lst_to_tibble(x, .rows, .name_repair, col_lengths(x))
   19. │                   └─tibble:::set_repaired_names(x, repair_hint = TRUE, .name_repair)
   20. │                     ├─rlang::set_names(...)
   21. │                     └─tibble:::repaired_names(...)
   22. │                       ├─tibble:::subclass_name_repair_errors(...)
   23. │                       │ └─base::withCallingHandlers(...)
   24. │                       └─vctrs::vec_as_names(...)
   25. ├─base::as.data.frame(., stringsAsFactors = FALSE)
   26. └─vctrs:::describe_repair(`<chr>`, `<chr>`)
   27.   └─rlang::names_inform_repair(orig_names, names)
   28.     └─rlang::inform(message = message, class = "rlib_message_name_repair")
   29.       ├─base::withRestarts(...)
   30.       │ └─base (local) withOneRestart(expr, restarts[[1L]])
   31.       │   └─base (local) doWithOneRestart(return(expr), restart)
   32.       └─base::signalCondition(cnd)
   33.         ├─base::conditionMessage(cond)
   34.         └─rlang:::conditionMessage.rlang_message(cond)
   35.           └─rlang::cnd_message(c)
   36.             └─rlang:::cnd_message_format(cnd, ...)
   37.               └─rlang (local) cli_format(glue_escape(lines))
   38.                 └─rlang:::.rlang_cli_format(x, cli::format_message)
   39.                   └─cli::cli_format(x, .envir = emptyenv())
   40.                     └─cli:::fmt(...)
   41.                       └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   42.                         ├─base::do.call(app[[msg$type]], msg$args)
   43.                         └─cli (local) `<fn>`(text = `<named list>`, id = "cli-24140-66", class = NULL)
   44.                           └─cli:::clii_bullets(app, text, id, class)
   45.                             └─base::lapply(...)
   46.                               └─cli (local) FUN(X[[i]], ...)
   47.                                 └─app$text(text[[i]])
   48.                                   └─cli:::clii_text(app, text)
   49.                                     └─app$xtext(text)
   50.                                       └─cli:::clii__xtext(...)
   51.                                         └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   52.                                           └─base::lapply(pars, ansi_trimws)
   53.                                             └─cli (local) FUN(X[[i]], ...)
  ── Error (test-10-excel.R:33:5): read_excel_raw() `keepData = TRUE` and `raw = TRUE` ──
  Error in `nchar(xs)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-10-excel.R:33:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─... %>% `attr<-`("fileName", "none")
    5. ├─dmdScheme::read_excel_raw(file = scheme_path_xlsx(), checkVersion = FALSE)
    6. │ └─base::lapply(...)
    7. │   └─dmdScheme (local) FUN(X[[i]], ...)
    8. │     ├─... %>% as.data.frame(stringsAsFactors = FALSE)
    9. │     ├─base::suppressMessages(...)
   10. │     │ └─base::withCallingHandlers(...)
   11. │     └─readxl::read_excel(...)
   12. │       └─readxl:::read_excel_(...)
   13. │         └─readxl:::set_readxl_names(...)
   14. │           ├─tibble::as_tibble(l, .name_repair = .name_repair)
   15. │           └─tibble:::as_tibble.list(l, .name_repair = .name_repair)
   16. │             └─tibble:::lst_to_tibble(x, .rows, .name_repair, col_lengths(x))
   17. │               └─tibble:::set_repaired_names(x, repair_hint = TRUE, .name_repair)
   18. │                 ├─rlang::set_names(...)
   19. │                 └─tibble:::repaired_names(...)
   20. │                   ├─tibble:::subclass_name_repair_errors(...)
   21. │                   │ └─base::withCallingHandlers(...)
   22. │                   └─vctrs::vec_as_names(...)
   23. ├─base::as.data.frame(., stringsAsFactors = FALSE)
   24. └─vctrs:::describe_repair(`<chr>`, `<chr>`)
   25.   └─rlang::names_inform_repair(orig_names, names)
   26.     └─rlang::inform(message = message, class = "rlib_message_name_repair")
   27.       ├─base::withRestarts(...)
   28.       │ └─base (local) withOneRestart(expr, restarts[[1L]])
   29.       │   └─base (local) doWithOneRestart(return(expr), restart)
   30.       └─base::signalCondition(cnd)
   31.         ├─base::conditionMessage(cond)
   32.         └─rlang:::conditionMessage.rlang_message(cond)
   33.           └─rlang::cnd_message(c)
   34.             └─rlang:::cnd_message_format(cnd, ...)
   35.               └─rlang (local) cli_format(glue_escape(lines))
   36.                 └─rlang:::.rlang_cli_format(x, cli::format_message)
   37.                   └─cli::cli_format(x, .envir = emptyenv())
   38.                     └─cli:::fmt(...)
   39.                       └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   40.                         ├─base::do.call(app[[msg$type]], msg$args)
   41.                         └─cli (local) `<fn>`(text = `<named list>`, id = "cli-24140-132", class = NULL)
   42.                           └─cli:::clii_bullets(app, text, id, class)
   43.                             └─base::lapply(...)
   44.                               └─cli (local) FUN(X[[i]], ...)
   45.                                 └─app$text(text[[i]])
   46.                                   └─cli:::clii_text(app, text)
   47.                                     └─app$xtext(text)
   48.                                       └─cli:::clii__xtext(...)
   49.                                         └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   50.                                           └─base::lapply(pars, ansi_trimws)
   51.                                             └─cli (local) FUN(X[[i]], ...)
  ── Error (test-10-excel.R:48:5): read_excel() `keepData = TRUE` and `raw = TRUE` ──
  Error in `nchar(xs)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-10-excel.R:48:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─... %>% `attr<-`("fileName", "none")
    5. ├─dmdScheme::read_excel(...)
    6. │ └─dmdScheme::read_excel_raw(file = file, verbose = verbose, checkVersion = TRUE)
    7. │   └─base::lapply(...)
    8. │     └─dmdScheme (local) FUN(X[[i]], ...)
    9. │       ├─... %>% as.data.frame(stringsAsFactors = FALSE)
   10. │       ├─base::suppressMessages(...)
   11. │       │ └─base::withCallingHandlers(...)
   12. │       └─readxl::read_excel(...)
   13. │         └─readxl:::read_excel_(...)
   14. │           └─readxl:::set_readxl_names(...)
   15. │             ├─tibble::as_tibble(l, .name_repair = .name_repair)
   16. │             └─tibble:::as_tibble.list(l, .name_repair = .name_repair)
   17. │               └─tibble:::lst_to_tibble(x, .rows, .name_repair, col_lengths(x))
   18. │                 └─tibble:::set_repaired_names(x, repair_hint = TRUE, .name_repair)
   19. │                   ├─rlang::set_names(...)
   20. │                   └─tibble:::repaired_names(...)
   21. │                     ├─tibble:::subclass_name_repair_errors(...)
   22. │                     │ └─base::withCallingHandlers(...)
   23. │                     └─vctrs::vec_as_names(...)
   24. ├─base::as.data.frame(., stringsAsFactors = FALSE)
   25. └─vctrs:::describe_repair(`<chr>`, `<chr>`)
   26.   └─rlang::names_inform_repair(orig_names, names)
   27.     └─rlang::inform(message = message, class = "rlib_message_name_repair")
   28.       ├─base::withRestarts(...)
   29.       │ └─base (local) withOneRestart(expr, restarts[[1L]])
   30.       │   └─base (local) doWithOneRestart(return(expr), restart)
   31.       └─base::signalCondition(cnd)
   32.         ├─base::conditionMessage(cond)
   33.         └─rlang:::conditionMessage.rlang_message(cond)
   34.           └─rlang::cnd_message(c)
   35.             └─rlang:::cnd_message_format(cnd, ...)
   36.               └─rlang (local) cli_format(glue_escape(lines))
   37.                 └─rlang:::.rlang_cli_format(x, cli::format_message)
   38.                   └─cli::cli_format(x, .envir = emptyenv())
   39.                     └─cli:::fmt(...)
   40.                       └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   41.                         ├─base::do.call(app[[msg$type]], msg$args)
   42.                         └─cli (local) `<fn>`(text = `<named list>`, id = "cli-24140-198", class = NULL)
   43.                           └─cli:::clii_bullets(app, text, id, class)
   44.                             └─base::lapply(...)
   45.                               └─cli (local) FUN(X[[i]], ...)
   46.                                 └─app$text(text[[i]])
   47.                                   └─cli:::clii_text(app, text)
   48.                                     └─app$xtext(text)
   49.                                       └─cli:::clii__xtext(...)
   50.                                         └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   51.                                           └─base::lapply(pars, ansi_trimws)
   52.                                             └─cli (local) FUN(X[[i]], ...)
  ── Error (test-10-excel.R:63:5): read_excel() `keepData = TRUE` and `raw = FALSE` ──
  Error in `nchar(xs)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-10-excel.R:63:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─... %>% `attr<-`("fileName", "none")
    5. ├─dmdScheme::read_excel(...)
    6. │ └─dmdScheme::read_excel_raw(file = file, verbose = verbose, checkVersion = TRUE)
    7. │   └─base::lapply(...)
    8. │     └─dmdScheme (local) FUN(X[[i]], ...)
    9. │       ├─... %>% as.data.frame(stringsAsFactors = FALSE)
   10. │       ├─base::suppressMessages(...)
   11. │       │ └─base::withCallingHandlers(...)
   12. │       └─readxl::read_excel(...)
   13. │         └─readxl:::read_excel_(...)
   14. │           └─readxl:::set_readxl_names(...)
   15. │             ├─tibble::as_tibble(l, .name_repair = .name_repair)
   16. │             └─tibble:::as_tibble.list(l, .name_repair = .name_repair)
   17. │               └─tibble:::lst_to_tibble(x, .rows, .name_repair, col_lengths(x))
   18. │                 └─tibble:::set_repaired_names(x, repair_hint = TRUE, .name_repair)
   19. │                   ├─rlang::set_names(...)
   20. │                   └─tibble:::repaired_names(...)
   21. │                     ├─tibble:::subclass_name_repair_errors(...)
   22. │                     │ └─base::withCallingHandlers(...)
   23. │                     └─vctrs::vec_as_names(...)
   24. ├─base::as.data.frame(., stringsAsFactors = FALSE)
   25. └─vctrs:::describe_repair(`<chr>`, `<chr>`)
   26.   └─rlang::names_inform_repair(orig_names, names)
   27.     └─rlang::inform(message = message, class = "rlib_message_name_repair")
   28.       ├─base::withRestarts(...)
   29.       │ └─base (local) withOneRestart(expr, restarts[[1L]])
   30.       │   └─base (local) doWithOneRestart(return(expr), restart)
   31.       └─base::signalCondition(cnd)
   32.         ├─base::conditionMessage(cond)
   33.         └─rlang:::conditionMessage.rlang_message(cond)
   34.           └─rlang::cnd_message(c)
   35.             └─rlang:::cnd_message_format(cnd, ...)
   36.               └─rlang (local) cli_format(glue_escape(lines))
   37.                 └─rlang:::.rlang_cli_format(x, cli::format_message)
   38.                   └─cli::cli_format(x, .envir = emptyenv())
   39.                     └─cli:::fmt(...)
   40.                       └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   41.                         ├─base::do.call(app[[msg$type]], msg$args)
   42.                         └─cli (local) `<fn>`(text = `<named list>`, id = "cli-24140-264", class = NULL)
   43.                           └─cli:::clii_bullets(app, text, id, class)
   44.                             └─base::lapply(...)
   45.                               └─cli (local) FUN(X[[i]], ...)
   46.                                 └─app$text(text[[i]])
   47.                                   └─cli:::clii_text(app, text)
   48.                                     └─app$xtext(text)
   49.                                       └─cli:::clii__xtext(...)
   50.                                         └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   51.                                           └─base::lapply(pars, ansi_trimws)
   52.                                             └─cli (local) FUN(X[[i]], ...)
  ── Error (test-10-excel.R:78:5): read_excel() `keepData = FALSE` and `raw = FALSE` ──
  Error in `nchar(xs)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-10-excel.R:78:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─... %>% `attr<-`("fileName", "none")
    5. ├─dmdScheme::read_excel(...)
    6. │ └─dmdScheme::read_excel_raw(file = file, verbose = verbose, checkVersion = TRUE)
    7. │   └─base::lapply(...)
    8. │     └─dmdScheme (local) FUN(X[[i]], ...)
    9. │       ├─... %>% as.data.frame(stringsAsFactors = FALSE)
   10. │       ├─base::suppressMessages(...)
   11. │       │ └─base::withCallingHandlers(...)
   12. │       └─readxl::read_excel(...)
   13. │         └─readxl:::read_excel_(...)
   14. │           └─readxl:::set_readxl_names(...)
   15. │             ├─tibble::as_tibble(l, .name_repair = .name_repair)
   16. │             └─tibble:::as_tibble.list(l, .name_repair = .name_repair)
   17. │               └─tibble:::lst_to_tibble(x, .rows, .name_repair, col_lengths(x))
   18. │                 └─tibble:::set_repaired_names(x, repair_hint = TRUE, .name_repair)
   19. │                   ├─rlang::set_names(...)
   20. │                   └─tibble:::repaired_names(...)
   21. │                     ├─tibble:::subclass_name_repair_errors(...)
   22. │                     │ └─base::withCallingHandlers(...)
   23. │                     └─vctrs::vec_as_names(...)
   24. ├─base::as.data.frame(., stringsAsFactors = FALSE)
   25. └─vctrs:::describe_repair(`<chr>`, `<chr>`)
   26.   └─rlang::names_inform_repair(orig_names, names)
   27.     └─rlang::inform(message = message, class = "rlib_message_name_repair")
   28.       ├─base::withRestarts(...)
   29.       │ └─base (local) withOneRestart(expr, restarts[[1L]])
   30.       │   └─base (local) doWithOneRestart(return(expr), restart)
   31.       └─base::signalCondition(cnd)
   32.         ├─base::conditionMessage(cond)
   33.         └─rlang:::conditionMessage.rlang_message(cond)
   34.           └─rlang::cnd_message(c)
   35.             └─rlang:::cnd_message_format(cnd, ...)
   36.               └─rlang (local) cli_format(glue_escape(lines))
   37.                 └─rlang:::.rlang_cli_format(x, cli::format_message)
   38.                   └─cli::cli_format(x, .envir = emptyenv())
   39.                     └─cli:::fmt(...)
   40.                       └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   41.                         ├─base::do.call(app[[msg$type]], msg$args)
   42.                         └─cli (local) `<fn>`(text = `<named list>`, id = "cli-24140-330", class = NULL)
   43.                           └─cli:::clii_bullets(app, text, id, class)
   44.                             └─base::lapply(...)
   45.                               └─cli (local) FUN(X[[i]], ...)
   46.                                 └─app$text(text[[i]])
   47.                                   └─cli:::clii_text(app, text)
   48.                                     └─app$xtext(text)
   49.                                       └─cli:::clii__xtext(...)
   50.                                         └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   51.                                           └─base::lapply(pars, ansi_trimws)
   52.                                             └─cli (local) FUN(X[[i]], ...)
  ── Error (test-10-excel.R:96:5): read_excel() --> write_excel() roundtrip ──────
  Error in `nchar(xs)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-10-excel.R:96:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─... %>% `attr<-`("fileName", "none")
    5. ├─dmdScheme::read_excel(.)
    6. │ └─dmdScheme::read_excel_raw(file = file, verbose = verbose, checkVersion = TRUE)
    7. │   └─base::lapply(...)
    8. │     └─dmdScheme (local) FUN(X[[i]], ...)
    9. │       ├─... %>% as.data.frame(stringsAsFactors = FALSE)
   10. │       ├─base::suppressMessages(...)
   11. │       │ └─base::withCallingHandlers(...)
   12. │       └─readxl::read_excel(...)
   13. │         └─readxl:::read_excel_(...)
   14. │           └─readxl:::set_readxl_names(...)
   15. │             ├─tibble::as_tibble(l, .name_repair = .name_repair)
   16. │             └─tibble:::as_tibble.list(l, .name_repair = .name_repair)
   17. │               └─tibble:::lst_to_tibble(x, .rows, .name_repair, col_lengths(x))
   18. │                 └─tibble:::set_repaired_names(x, repair_hint = TRUE, .name_repair)
   19. │                   ├─rlang::set_names(...)
   20. │                   └─tibble:::repaired_names(...)
   21. │                     ├─tibble:::subclass_name_repair_errors(...)
   22. │                     │ └─base::withCallingHandlers(...)
   23. │                     └─vctrs::vec_as_names(...)
   24. ├─base::as.data.frame(., stringsAsFactors = FALSE)
   25. └─vctrs:::describe_repair(`<chr>`, `<chr>`)
   26.   └─rlang::names_inform_repair(orig_names, names)
   27.     └─rlang::inform(message = message, class = "rlib_message_name_repair")
   28.       ├─base::withRestarts(...)
   29.       │ └─base (local) withOneRestart(expr, restarts[[1L]])
   30.       │   └─base (local) doWithOneRestart(return(expr), restart)
   31.       └─base::signalCondition(cnd)
   32.         ├─base::conditionMessage(cond)
   33.         └─rlang:::conditionMessage.rlang_message(cond)
   34.           └─rlang::cnd_message(c)
   35.             └─rlang:::cnd_message_format(cnd, ...)
   36.               └─rlang (local) cli_format(glue_escape(lines))
   37.                 └─rlang:::.rlang_cli_format(x, cli::format_message)
   38.                   └─cli::cli_format(x, .envir = emptyenv())
   39.                     └─cli:::fmt(...)
   40.                       └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   41.                         ├─base::do.call(app[[msg$type]], msg$args)
   42.                         └─cli (local) `<fn>`(text = `<named list>`, id = "cli-24140-396", class = NULL)
   43.                           └─cli:::clii_bullets(app, text, id, class)
   44.                             └─base::lapply(...)
   45.                               └─cli (local) FUN(X[[i]], ...)
   46.                                 └─app$text(text[[i]])
   47.                                   └─cli:::clii_text(app, text)
   48.                                     └─app$xtext(text)
   49.                                       └─cli:::clii__xtext(...)
   50.                                         └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   51.                                           └─base::lapply(pars, ansi_trimws)
   52.                                             └─cli (local) FUN(X[[i]], ...)
  
  [ FAIL 6 | WARN 0 | SKIP 8 | PASS 40 ]
  Error: Test failures
  Execution halted