Running ‘testthat.R’ [29s/265s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(ecocomDP)
  > 
  > test_check("ecocomDP")
  [ FAIL 3 | WARN 1 | SKIP 10 | PASS 713 ]
  
  ══ Skipped tests (10) ══════════════════════════════════════════════════════════
  • On CRAN (10): 'test_convert_to_dwca.R:8:3', 'test_create_eml.R:8:3',
    'test_read_data.R:6:3', 'test_search_data.R:8:3', 'test_search_data.R:22:3',
    'test_search_data.R:37:3', 'test_search_data.R:49:3',
    'test_search_data.R:73:3', 'test_validate_arguments.R:327:5',
    'test_validate_data.R:421:3'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure ('test_validate_arguments.R:323:3'): read_data() ────────────────────
  `validate_arguments("read_data", as.list(list(id = 1)))` threw an error with unexpected message.
  Expected match: "Input 'id' should be character."
  Actual message: "Timeout was reached: [pasta.lternet.edu] SSL connection timeout"
  Backtrace:
      ▆
   1. ├─testthat::expect_error(...) at test_validate_arguments.R:323:3
   2. │ └─testthat:::quasi_capture(...)
   3. │   ├─testthat (local) .capture(...)
   4. │   │ └─base::withCallingHandlers(...)
   5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
   6. └─ecocomDP:::validate_arguments("read_data", as.list(list(id = 1)))
   7.   └─ecocomDP:::ping_edi()
   8.     └─httr::RETRY("GET", url = "https://pasta.lternet.edu/package/eml/edi/759")
  ── Error ('test_validate_arguments.R:336:3'): read_data() ──────────────────────
  Error in `curl::curl_fetch_memory(url, handle = handle)`: Timeout was reached: [pasta.lternet.edu] SSL connection timeout
  Backtrace:
      ▆
   1. ├─testthat::expect_null(validate_arguments("read_data", as.list(list(path = tempdir())))) at test_validate_arguments.R:336:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─ecocomDP:::validate_arguments("read_data", as.list(list(path = tempdir())))
   5.   └─ecocomDP:::ping_edi()
   6.     └─httr::RETRY("GET", url = "https://pasta.lternet.edu/package/eml/edi/759")
  ── Failure ('test_validate_arguments.R:425:3'): save_data() ────────────────────
  `validate_arguments("read_data", as.list(list(path = "/some/invalid/path")))` threw an error with unexpected message.
  Expected match: "Input 'path' .+ doesn't exist."
  Actual message: "Timeout was reached: [pasta.lternet.edu] SSL connection timeout"
  Backtrace:
      ▆
   1. ├─testthat::expect_error(...) at test_validate_arguments.R:425:3
   2. │ └─testthat:::quasi_capture(...)
   3. │   ├─testthat (local) .capture(...)
   4. │   │ └─base::withCallingHandlers(...)
   5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
   6. └─ecocomDP:::validate_arguments("read_data", as.list(list(path = "/some/invalid/path")))
   7.   └─ecocomDP:::ping_edi()
   8.     └─httr::RETRY("GET", url = "https://pasta.lternet.edu/package/eml/edi/759")
  
  [ FAIL 3 | WARN 1 | SKIP 10 | PASS 713 ]
  Error: Test failures
  Execution halted