Running ‘testthat.R’ [5s/40s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(xlm)
  > 
  > test_check("xlm")
  OMP: Warning #96: Cannot form a team with 24 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).
  ── 1. Failure: Error handling for bad public key. (@test-getEffects_Account.R#32
  `getEffects_Account(invalid_pk, domain = domain, data.table = FALSE)` did not throw an error.
  
  ── 2. Error: The first 20 ledgers from the network can be pulled. (@test-getLedg
  column or argument 3 is NULL
  1: getLedgers(n, domain = domain) at testthat/test-getLedgers.R:7
  2: listToDF(response)
  3: lapply(records_no_links, function(record) {
         find_nested_structures = sapply(record, length)
         if (all(find_nested_structures == 1) || is_trade_agg) 
             return(NULL)
         inds = which(find_nested_structures > 1)
         return(data.table(id = ifelse(is.null(record$id), record$asset_code, record$id), 
             field = rep(names(record)[inds], find_nested_structures[inds]), value = unlist(record[inds])))
     })
  4: FUN(X[[i]], ...)
  5: data.table(id = ifelse(is.null(record$id), record$asset_code, record$id), field = rep(names(record)[inds], 
         find_nested_structures[inds]), value = unlist(record[inds]))
  6: stop("column or argument ", i, " is NULL")
  
  ── 3. Failure: Error handling for bad public key. (@test-getOffers_Account.R#34)
  exists("_links", a4) isn't true.
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 267 SKIPPED: 0 FAILED: 3
  1. Failure: Error handling for bad public key. (@test-getEffects_Account.R#32) 
  2. Error: The first 20 ledgers from the network can be pulled. (@test-getLedgers.R#7) 
  3. Failure: Error handling for bad public key. (@test-getOffers_Account.R#34) 
  
  Error: testthat unit tests failed
  Execution halted