Running ‘testthat.R’
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(readxl)
  > 
  > test_check("readxl")
  
   *** caught segfault ***
  address 27e32d0, cause 'memory not mapped'
  
  Traceback:
   1: delayedAssign(x, get(method, envir = home), assign.env = envir)
   2: assignWrapped(nm, method, home = envir, envir = table)
   3: .registerS3method(fin[i, 1], fin[i, 2], fin[i, 3], fin[i, 4],     env)
   4: registerS3methods(nsInfo$S3methods, package, env)
   5: loadNamespace(name)
   6: doTryCatch(return(expr), name, parentenv, handler)
   7: tryCatchOne(expr, names, parentenv, handlers[[1L]])
   8: tryCatchList(expr, classes, parentenv, handlers)
   9: tryCatch(loadNamespace(name), error = function(e) stop(e))
  10: getNamespace(ns)
  11: asNamespace(ns)
  12: getExportedValue(pkg, name)
  13: tools::file_ext
  14: tolower(tools::file_ext(path))
  15: read_excel("blanks.xlsx")
  16: eval(expr, envir, enclos)
  17: eval(code, test_env)
  18: withCallingHandlers(eval(code, test_env), expectation = handle_expectation,     skip = handle_skip, warning = handle_warning, message = handle_message,     error = handle_error)
  19: doTryCatch(return(expr), name, parentenv, handler)
  20: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  21: tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
  22: doTryCatch(return(expr), name, parentenv, handler)
  23: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]),     names[nh], parentenv, handlers[[nh]])
  24: tryCatchList(expr, classes, parentenv, handlers)
  25: tryCatch(withCallingHandlers(eval(code, test_env), expectation = handle_expectation,     skip = handle_skip, warning = handle_warning, message = handle_message,     error = handle_error), error = function(e) {}, skip = function(e) {})
  26: test_code(desc, code, env = parent.frame())
  27: test_that("blanks read as missing [xlsx]", {    blanks <- read_excel("blanks.xlsx")    expect_equal(blanks$x, c(NA, 1))    expect_equal(blanks$y, c("a", NA))})
  28: eval(expr, envir, enclos)
  29: eval(exprs, env)
  30: source_file(path, new.env(parent = env), chdir = TRUE)
  31: force(code)
  32: with_reporter(reporter = reporter, start_end_reporter = start_end_reporter,     {        lister$start_file(basename(path))        source_file(path, new.env(parent = env), chdir = TRUE)        end_context()    })
  33: FUN(X[[i]], ...)
  34: lapply(paths, test_file, env = env, reporter = current_reporter,     start_end_reporter = FALSE, load_helpers = FALSE)
  35: force(code)
  36: with_reporter(reporter = current_reporter, results <- lapply(paths,     test_file, env = env, reporter = current_reporter, start_end_reporter = FALSE,     load_helpers = FALSE))
  37: test_files(paths, reporter = reporter, env = env, ...)
  38: test_dir(test_path, reporter = reporter, env = env, filter = filter,     ...)
  39: with_top_env(env, {    test_dir(test_path, reporter = reporter, env = env, filter = filter,         ...)})
  40: run_tests(package, test_path, filter, reporter, ...)
  41: test_check("readxl")
  An irrecoverable exception occurred. R is aborting now ...