Running ‘testthat.R’ [19s/47s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > # setting R_TESTS to empty string because of
  > # https://github.com/hadley/testthat/issues/144
  > # revert this when that issue in R is fixed.
  > Sys.setenv("R_TESTS" = "")
  > 
  > library(testthat)
  > library(batchtools)
  Loading required package: data.table
  Breaking change introduced in batchtools v0.9.6: The format of the returned data.table of the functions `reduceResultsDataTable()`, getJobTable()`, `getJobPars()`, and `getJobResources()` has changed. List columns are not unnested automatically anymore. To manually unnest tables, batchtools provides the helper function `unwrap()` now, e.g. `unwrap(getJobPars())`. The previously introduced helper function `flatten()` will be deprecated due to a name clash with `purrr::flatten()`.
  > 
  > test_check("batchtools")
  ── 1. Error: chunkIds (@test_chunkIds.R#21)  ───────────────────────────────────
  SETLENGTH() cannot be applied to an ALTVEC object.
  1: suppressWarnings(chunkIds(ids, n.chunks = 1, group.by = "problem", reg = reg)) at testthat/test_chunkIds.R:21
  2: withCallingHandlers(expr, warning = function(w) invokeRestart("muffleWarning"))
  3: chunkIds(ids, n.chunks = 1, group.by = "problem", reg = reg)
  4: ids[, `:=`("chunk", chunk(job.id, n.chunks = n.chunks, chunk.size = chunk.size)), 
         by = group.by]
  5: `[.data.table`(ids, , `:=`("chunk", chunk(job.id, n.chunks = n.chunks, chunk.size = chunk.size)), 
         by = group.by)
  
  ── 2. Error: estimateRuntimes (@test_estimateRuntimes.R#12)  ───────────────────
  SETLENGTH() cannot be applied to an ALTVEC object.
  1: tab[, .SD[sample(nrow(.SD), 4)], by = c("problem", "algorithm", "y")] at testthat/test_estimateRuntimes.R:12
  2: `[.data.table`(tab, , .SD[sample(nrow(.SD), 4)], by = c("problem", "algorithm", "y")) at testthat/test_estimateRuntimes.R:12
  
  ── 3. Error: tags work (@test_tags.R#12)  ──────────────────────────────────────
  SETLENGTH() cannot be applied to an ALTVEC object.
  1: getJobTags(reg = reg) at testthat/test_tags.R:12
  2: reg$tags[ids, on = "job.id"][, list(tags = stri_flatten(sort(tag, na.last = TRUE), 
         ",")), by = "job.id"]
  3: `[.data.table`(reg$tags[ids, on = "job.id"], , list(tags = stri_flatten(sort(tag, 
         na.last = TRUE), ",")), by = "job.id")
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 1344 SKIPPED: 7 FAILED: 3
  1. Error: chunkIds (@test_chunkIds.R#21) 
  2. Error: estimateRuntimes (@test_estimateRuntimes.R#12) 
  3. Error: tags work (@test_tags.R#12) 
  
  Error: testthat unit tests failed
  Execution halted