Running ‘testthat.R’ [3s/4s]
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(cvdprevent)
  > 
  > test_check("cvdprevent")
  x Indicator ID is invalid
  x Indicator ID is invalid
  x Metric ID is invalid
  x Metric ID is invalid
  x Metric ID is invalid
  x Pathway Group ID is invalid
  x Indicator Group ID is invalid
  x Metric ID is invalid
  x Either Metric ID or Area ID is invalid
  x Either Metric ID, Area ID or Time Period ID are invalid
  x Either Metric ID or Time Period ID are invalid
  x HTTPS error - please check either Time Period ID, Indicator ID (if supplied) and Metric Category Type ID (if supplied)
  [ FAIL 23 | WARN 0 | SKIP 0 | PASS 12 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure ('test-cvd_api_functions.R:8:3'): cvd_time_period_list works ────────
  Expected `test <- cvd_time_period_list()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Error ('test-cvd_api_functions.R:11:3'): cvd_time_period_list works ─────────
  Error in `eval(code, test_env)`: object 'test' not found
  Backtrace:
      ▆
   1. └─testthat::expect_gte(max(test$TimePeriodID), 17) at test-cvd_api_functions.R:11:3
   2.   └─testthat::quasi_label(enquo(object), label, arg = "object")
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Failure ('test-cvd_api_functions.R:17:3'): cvd_time_period_system_levels works ──
  Expected `test <- cvd_time_period_system_levels()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Failure ('test-cvd_api_functions.R:24:3'): cvd_area_system_level works ──────
  Expected `test <- cvd_area_system_level()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Failure ('test-cvd_api_functions.R:32:3'): cvd_area_system_level_time_periods works ──
  Expected `test <- cvd_area_system_level_time_periods()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Failure ('test-cvd_api_functions.R:39:3'): cvd_area_list works ──────────────
  Expected `test <- cvd_area_list(system_level_id = 2)` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Failure ('test-cvd_api_functions.R:46:3'): cvd_area_details works ───────────
  Expected `test <- cvd_area_details()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Error ('test-cvd_api_functions.R:49:3'): cvd_area_details works ─────────────
  Error in `eval(code, test_env)`: object 'test' not found
  Backtrace:
      ▆
   1. └─testthat::expect_named(test, c("area_details")) at test-cvd_api_functions.R:49:3
   2.   └─testthat::quasi_label(enquo(object), label, arg = "object")
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Failure ('test-cvd_api_functions.R:56:3'): cvd_area_unassigned works ────────
  Expected `test <- cvd_area_unassigned(system_level_id = 1)` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Failure ('test-cvd_api_functions.R:63:3'): cvd_area_search works ────────────
  Expected `test <- cvd_area_search(partial_area_name = "foo")` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Failure ('test-cvd_api_functions.R:70:3'): cvd_area_nested_subsystems works ──
  Expected `test <- cvd_area_nested_subsystems()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Error ('test-cvd_api_functions.R:73:3'): cvd_area_nested_subsystems works ───
  Error in `eval(code, test_env)`: object 'test' not found
  Backtrace:
      ▆
   1. └─testthat::expect_named(...) at test-cvd_api_functions.R:73:3
   2.   └─testthat::quasi_label(enquo(object), label, arg = "object")
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Failure ('test-cvd_api_functions.R:80:3'): cvd_area_flat_subsystems works ───
  Expected `test <- cvd_area_flat_subsystems()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Failure ('test-cvd_api_functions.R:88:3'): cvd_indicator_list works ─────────
  Expected `test <- cvd_indicator_list()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Failure ('test-cvd_api_functions.R:95:3'): cvd_indicator_metric_list works ──
  Expected `test <- cvd_indicator_metric_list()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Failure ('test-cvd_api_functions.R:102:3'): cvd_indicator works ─────────────
  Expected `test <- cvd_indicator()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Failure ('test-cvd_api_functions.R:109:3'): cvd_indicator works ─────────────
  Expected `test <- cvd_indicator()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Error ('test-cvd_api_functions.R:112:3'): cvd_indicator works ───────────────
  Error in `eval(code, test_env)`: object 'test' not found
  Backtrace:
      ▆
   1. └─testthat::expect_named(...) at test-cvd_api_functions.R:112:3
   2.   └─testthat::quasi_label(enquo(object), label, arg = "object")
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Failure ('test-cvd_api_functions.R:119:3'): cvd_indicator_tags works ────────
  Expected `test <- cvd_indicator_tags()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Failure ('test-cvd_api_functions.R:133:3'): cvd_indicator_sibling works ─────
  Expected `test <- cvd_indicator_sibling()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Failure ('test-cvd_api_functions.R:140:3'): cvd_indicator_child_data works ──
  Expected `test <- cvd_indicator_child_data()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Failure ('test-cvd_api_functions.R:175:3'): cvd_indicator_priority_groups works ──
  Expected `test <- cvd_indicator_priority_groups()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  ── Failure ('test-cvd_api_functions.R:226:3'): cvd_external_resource works ─────
  Expected `test <- cvd_external_resource()` to run without any errors.
  i Actually got a <httr2_http_502> with text:
    HTTP 502 Bad Gateway.
  
  [ FAIL 23 | WARN 0 | SKIP 0 | PASS 12 ]
  Error: Test failures
  Execution halted