Running ‘testthat.R’ [10s/33s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > # This file is part of the standard setup for testthat.
  > # It is recommended that you do not modify it.
  > #
  > # Where should you do additional test configuration?
  > # Learn more about the roles of various files in:
  > # * https://r-pkgs.org/testing-design.html#sec-tests-files-overview
  > # * https://testthat.r-lib.org/articles/special-files.html
  > 
  > library(testthat)
  > library(cryptoQuotes)
  ── cryptoQuotes 1.2.1 ───────────────────────────────────────── release notes ──
  > 
  > test_check("cryptoQuotes")
  [ FAIL 5 | WARN 0 | SKIP 0 | PASS 65 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-availableTickers.R:54:7'): availablePairs on Kraken returns a vector of characters, with lenght > 1 ──
  Error in `httr2::resp_body_json(resp = response$response, simplifyVector = TRUE)`: Unexpected content type "text/html".
  * Expecting type "application/json" or suffix "json".
  Backtrace:
      ▆
   1. └─cryptoQuotes::availableTickers(source = "kraken", futures = lgl) at test-availableTickers.R:54:7
   2.   ├─base::sort(...)
   3.   └─cryptoQuotes:::ticker_response(...)
   4.     └─httr2::resp_body_json(resp = response$response, simplifyVector = TRUE)
   5.       └─httr2::resp_check_content_type(...)
   6.         └─httr2:::check_content_type(...)
   7.           └─cli::cli_abort(...)
   8.             └─rlang::abort(...)
  ── Failure ('test-getLSRatio.R:20:5'): Test that the LSR ratio is returned as expected ──
  Expected `... <- NULL` to run without any errors.
  i Actually got a <rlang_error> with text:
    parameter 'startTime' is invalid.
  ── Error ('test-getLSRatio.R:28:5'): Test that the LSR ratio is returned as expected ──
  Error in `eval(code, test_env)`: object 'LSR' not found
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(object = nrow(LSR), expected = 30) at test-getLSRatio.R:28:5
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─base::nrow(LSR)
  ── Failure ('test-getQuote.R:207:7'): Check if Bitmart API returns data correctly ──
  nrow(returned_quote) (`actual`) not equal to 100 (`expected`).
  
    `actual`:  99
  `expected`: 100
  ── Failure ('test-getQuote.R:289:7'): Check if Kraken API returns data correctly ──
  nrow(returned_quote) (`actual`) not equal to 100 (`expected`).
  
    `actual`:  99
  `expected`: 100
  
  [ FAIL 5 | WARN 0 | SKIP 0 | PASS 65 ]
  Error: Test failures
  Execution halted