Running ‘testthat.R’ [3s/111s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(galah)
  > 
  > ala_config(cache_directory = tempdir(), email = "ala4r@ala.org.au",
  +            caching = FALSE)
  > test_check("galah")
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (38)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-ala_species.R:10:3): ala_species returns dataframe ──────────────
  Error: Timeout was reached: [namematching-ws.ala.org.au] Connection timed out after 10001 milliseconds
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-ala_species.R:10:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─galah::ala_species(taxa = select_taxa("reptilia"), filters = select_filters(basis_of_record = "FossilSpecimen"))
    5. │ └─galah:::build_query(taxa, filters, locations)
    6. └─galah::select_taxa("reptilia")
    7.   ├─data.table::rbindlist(...)
    8.   └─base::lapply(...)
    9.     └─galah:::FUN(X[[i]], ...)
   10.       └─galah:::name_lookup(t)
   11.         └─galah:::ala_GET(url, path, query)
   12.           └─cli$get(path = path, query = params, encode = "json")
   13.             └─private$make_request(rr)
   14.               └─crul:::crul_fetch(opts)
   15.                 └─curl::curl_fetch_memory(x$url$url, handle = x$url$handle)
  ── Error (test-ala_species.R:17:3): ala_species returns a sensible result ──────
  Error: Timeout was reached: [namematching-ws.ala.org.au] Connection timed out after 10001 milliseconds
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-ala_species.R:17:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─base::nrow(ala_species(taxa = select_taxa("Osphranter")))
    5. ├─galah::ala_species(taxa = select_taxa("Osphranter"))
    6. │ └─galah:::build_query(taxa, filters, locations)
    7. └─galah::select_taxa("Osphranter")
    8.   ├─data.table::rbindlist(...)
    9.   └─base::lapply(...)
   10.     └─galah:::FUN(X[[i]], ...)
   11.       └─galah:::name_lookup(t)
   12.         └─galah:::ala_GET(url, path, query)
   13.           └─cli$get(path = path, query = params, encode = "json")
   14.             └─private$make_request(rr)
   15.               └─crul:::crul_fetch(opts)
   16.                 └─curl::curl_fetch_memory(x$url$url, handle = x$url$handle)
  ── Error (test-find_profiles.R:4:3): ALA data profiles behaves as expected ─────
  Error: Timeout was reached: [data-quality-service.ala.org.au] Connection timed out after 10000 milliseconds
  Backtrace:
      █
   1. ├─testthat::expect_equal(class(find_profiles()), "data.frame") test-find_profiles.R:4:2
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─galah::find_profiles()
   5.   └─galah:::ala_GET(url, "api/v1/profiles", list(enabled = "true"))
   6.     └─cli$get(path = path, query = params, encode = "json")
   7.       └─private$make_request(rr)
   8.         └─crul:::crul_fetch(opts)
   9.           └─curl::curl_fetch_memory(x$url$url, handle = x$url$handle)
  ── Error (test-find_profiles.R:14:3): find_profile_attributes returns dataframe ──
  Error: Timeout was reached: [data-quality-service.ala.org.au] Connection timed out after 10001 milliseconds
  Backtrace:
       █
    1. ├─testthat::expect_equal(ncol(find_profile_attributes(2)), 2) test-find_profiles.R:14:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─base::ncol(find_profile_attributes(2))
    5. └─galah::find_profile_attributes(2)
    6.   └─galah::find_profiles()
    7.     └─galah:::ala_GET(url, "api/v1/profiles", list(enabled = "true"))
    8.       └─cli$get(path = path, query = params, encode = "json")
    9.         └─private$make_request(rr)
   10.           └─crul:::crul_fetch(opts)
   11.             └─curl::curl_fetch_memory(x$url$url, handle = x$url$handle)
  ── Error (test-search_fields.R:4:3): search_fields returns correct types of field ──
  Error: Timeout was reached: [biocache-ws.ala.org.au] Failed to connect to biocache-ws.ala.org.au port 443: Connection timed out
  Backtrace:
       █
    1. ├─testthat::expect_setequal(...) test-search_fields.R:4:2
    2. │ └─testthat::quasi_label(enquo(object), arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─base::unique(search_fields(type = "all")$type)
    5. └─galah::search_fields(type = "all")
    6.   └─galah:::get_fields()
    7.     └─galah:::all_fields()
    8.       └─galah:::ala_GET(url, path = "ws/index/fields")
    9.         └─cli$get(path = path, query = params, encode = "json")
   10.           └─private$make_request(rr)
   11.             └─crul:::crul_fetch(opts)
   12.               └─curl::curl_fetch_memory(x$url$url, handle = x$url$handle)
  ── Error (test-search_fields.R:12:3): search_fields searches text correctly ────
  Error: Timeout was reached: [biocache-ws.ala.org.au] Failed to connect to biocache-ws.ala.org.au port 443: Connection timed out
  Backtrace:
       █
    1. ├─testthat::expect_true(...) test-search_fields.R:12:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─base::grepl(...)
    5. │ └─base::is.factor(x)
    6. └─galah::search_fields("precipitation")
    7.   └─galah:::get_fields()
    8.     └─galah:::all_fields()
    9.       └─galah:::ala_GET(url, path = "ws/index/fields")
   10.         └─cli$get(path = path, query = params, encode = "json")
   11.           └─private$make_request(rr)
   12.             └─crul:::crul_fetch(opts)
   13.               └─curl::curl_fetch_memory(x$url$url, handle = x$url$handle)
  ── Error (test-select_taxa.R:80:3): select_taxa handles name issues ────────────
  Error: Timeout was reached: [namematching-ws.ala.org.au] Connection timed out after 10001 milliseconds
  Backtrace:
       █
    1. ├─testthat::expect_warning(select_taxa("Microseris")) test-select_taxa.R:80:2
    2. │ └─testthat:::quasi_capture(enquo(object), label, capture_warnings)
    3. │   ├─testthat:::.capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. └─galah::select_taxa("Microseris")
    7.   ├─data.table::rbindlist(...)
    8.   └─base::lapply(...)
    9.     └─galah:::FUN(X[[i]], ...)
   10.       └─galah:::name_lookup(t)
   11.         └─galah:::ala_GET(url, path, query)
   12.           └─cli$get(path = path, query = params, encode = "json")
   13.             └─private$make_request(rr)
   14.               └─crul:::crul_fetch(opts)
   15.                 └─curl::curl_fetch_memory(x$url$url, handle = x$url$handle)
  ── Error (test-select_taxa.R:84:3): select_taxa returns children for multiple names ──
  Error: Timeout was reached: [namematching-ws.ala.org.au] Connection timed out after 10001 milliseconds
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-select_taxa.R:84:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─base::nrow(select_taxa(c("Osphranter", "Dasyurus"), children = TRUE))
    5. └─galah::select_taxa(c("Osphranter", "Dasyurus"), children = TRUE)
    6.   ├─data.table::rbindlist(...)
    7.   └─base::lapply(...)
    8.     └─galah:::FUN(X[[i]], ...)
    9.       └─galah:::name_lookup(t)
   10.         └─galah:::ala_GET(url, path, query)
   11.           └─cli$get(path = path, query = params, encode = "json")
   12.             └─private$make_request(rr)
   13.               └─crul:::crul_fetch(opts)
   14.                 └─curl::curl_fetch_memory(x$url$url, handle = x$url$handle)
  
  [ FAIL 8 | WARN 0 | SKIP 38 | PASS 6 ]
  Error: Test failures
  Execution halted