Running ‘testthat.R’ [77s/92s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(mashr)
  Loading required package: ashr
  > test_check("mashr")
  OMP: Warning #96: Cannot form a team with 8 threads, using 2 instead.
  OMP: Hint Consider unsetting KMP_DEVICE_THREAD_LIMIT (KMP_ALL_THREADS), KMP_TEAMS_THREAD_LIMIT, and OMP_THREAD_LIMIT (if any are set).
  [ FAIL 2 | WARN 0 | SKIP 3 | PASS 127 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • Cannot test it due to numerical differences between chol in armadillo and R ... (1)
  • file.exists("estimate_null_cor.rds") is not TRUE (1)
  • file.exists("estimate_null_cor_alpha.rds") is not TRUE (1)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test_sampling.R:10:3): Samples from the posterior look right ─────────
  Error in `all.equal.numeric(x, y, tolerance = tolerance, check.attributes = check.attributes, 
      ...)`: length(tolerance) == 1L is not TRUE
  Backtrace:
      █
   1. └─testthat::expect_equal(...) test_sampling.R:10:2
   2.   ├─testthat::compare(act$val, exp$val, ...)
   3.   └─testthat:::compare.numeric(act$val, exp$val, ...)
   4.     ├─base::all.equal(...)
   5.     └─base::all.equal.numeric(...)
   6.       └─base::stopifnot(length(tolerance) == 1L)
  ── Error (test_sampling.R:21:3): Samples from the posterior with linear transformation look right ──
  Error in `all.equal.numeric(x, y, tolerance = tolerance, check.attributes = check.attributes, 
      ...)`: length(tolerance) == 1L is not TRUE
  Backtrace:
      █
   1. └─testthat::expect_equal(...) test_sampling.R:21:2
   2.   ├─testthat::compare(act$val, exp$val, ...)
   3.   └─testthat:::compare.numeric(act$val, exp$val, ...)
   4.     ├─base::all.equal(...)
   5.     └─base::all.equal.numeric(...)
   6.       └─base::stopifnot(length(tolerance) == 1L)
  
  [ FAIL 2 | WARN 0 | SKIP 3 | PASS 127 ]
  Error: Test failures
  Execution halted