Running 'testthat.R' [22s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(EDIutils)
  > 
  > test_check("EDIutils")
  [ FAIL 4 | WARN 0 | SKIP 15 | PASS 142 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • Not run when logged out. Login with 'login()'. (12)
  • empty test (3)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_delete_event_subscription.R:7'): delete_event_subscription() works ──
  Error in `vapply(interactions, function(x) {
      sprintf("%s => %s", request_summary(Request$new()$from_hash(x$request)), 
          response_summary(VcrResponse$new()$from_hash(x$response)))
  }, "")`: values must be length 1,
   but FUN(X[[1]]) result is length 0
  Backtrace:
      ▆
   1. └─vcr::use_cassette(...) at test_delete_event_subscription.R:7:2
   2.   └─vcr::insert_cassette(...)
   3.     └─Cassette$new(...)
   4.       └─vcr (local) initialize(...)
   5.         └─self$http_interactions()
   6.           └─HTTPInteractionList$new(...)
   7.             └─vcr (local) initialize(...)
   8.               └─base::vapply(...)
  ── Error ('test_delete_journal_citation.R:7'): delete_journal_citation() works ──
  Error in `vapply(interactions, function(x) {
      sprintf("%s => %s", request_summary(Request$new()$from_hash(x$request)), 
          response_summary(VcrResponse$new()$from_hash(x$response)))
  }, "")`: values must be length 1,
   but FUN(X[[1]]) result is length 0
  Backtrace:
      ▆
   1. └─vcr::use_cassette(...) at test_delete_journal_citation.R:7:2
   2.   └─vcr::insert_cassette(...)
   3.     └─Cassette$new(...)
   4.       └─vcr (local) initialize(...)
   5.         └─self$http_interactions()
   6.           └─HTTPInteractionList$new(...)
   7.             └─vcr (local) initialize(...)
   8.               └─base::vapply(...)
  ── Error ('test_execute_event_subscription.R:6'): execute_event_subscription() works (mock test) ──
  Error in `vapply(interactions, function(x) {
      sprintf("%s => %s", request_summary(Request$new()$from_hash(x$request)), 
          response_summary(VcrResponse$new()$from_hash(x$response)))
  }, "")`: values must be length 1,
   but FUN(X[[1]]) result is length 0
  Backtrace:
      ▆
   1. └─vcr::use_cassette(...) at test_execute_event_subscription.R:6:2
   2.   └─vcr::insert_cassette(...)
   3.     └─Cassette$new(...)
   4.       └─vcr (local) initialize(...)
   5.         └─self$http_interactions()
   6.           └─HTTPInteractionList$new(...)
   7.             └─vcr (local) initialize(...)
   8.               └─base::vapply(...)
  ── Error ('test_login.R:4'): login() works ─────────────────────────────────────
  Error in `vapply(interactions, function(x) {
      sprintf("%s => %s", request_summary(Request$new()$from_hash(x$request)), 
          response_summary(VcrResponse$new()$from_hash(x$response)))
  }, "")`: values must be length 1,
   but FUN(X[[1]]) result is length 0
  Backtrace:
      ▆
   1. └─vcr::use_cassette(...) at test_login.R:4:2
   2.   └─vcr::insert_cassette(...)
   3.     └─Cassette$new(...)
   4.       └─vcr (local) initialize(...)
   5.         └─self$http_interactions()
   6.           └─HTTPInteractionList$new(...)
   7.             └─vcr (local) initialize(...)
   8.               └─base::vapply(...)
  
  [ FAIL 4 | WARN 0 | SKIP 15 | PASS 142 ]
  Error: Test failures
  Execution halted