Running ‘testthat.R’ [5s/21s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(cthist)
  > 
  > test_check("cthist")
  Unable to connect to clinicaltrials.gov
  Version caused a warning: NCT02110043 version 1
  Here's the original warning message:
  simpleWarning in open.connection(con, "rb"): cannot open URL 'https://clinicaltrials.gov/api/int/studies/NCT02110043/history/1': HTTP status was '421 Unknown Error'
   
  
  Saving _problems/test-clinicaltrials_gov_version_criteria-12.R
  Version caused a warning: NCT02110043 version 1
  Here's the original warning message:
  simpleWarning in open.connection(con, "rb"): cannot open URL 'https://clinicaltrials.gov/api/int/studies/NCT02110043/history/1': HTTP status was '421 Unknown Error'
   
  
  Saving _problems/test-clinicaltrials_gov_version_lead_sponsor-12.R
  Version caused a warning: NCT02110043 version 1
  Here's the original warning message:
  simpleWarning in open.connection(con, "rb"): cannot open URL 'https://clinicaltrials.gov/api/int/studies/NCT02110043/history/1': HTTP status was '421 Unknown Error'
   
  
  Saving _problems/test-clinicaltrials_gov_version_orgstudyid-12.R
  Version caused a warning: NCT02110043 version 1
  Here's the original warning message:
  simpleWarning in open.connection(con, "rb"): cannot open URL 'https://clinicaltrials.gov/api/int/studies/NCT02110043/history/1': HTTP status was '421 Unknown Error'
   
  
  Saving _problems/test-clinicaltrials_gov_version_overall_contacts-12.R
  Version caused a warning: NCT00098137 version 0
  Here's the original warning message:
  simpleWarning in open.connection(con, "rb"): cannot open URL 'https://clinicaltrials.gov/api/int/studies/NCT00098137/history/0': HTTP status was '421 Unknown Error'
   
  
  Saving _problems/test-clinicaltrials_gov_version_pcdate_none-12.R
  Version caused a warning: NCT02110043 version 1
  Here's the original warning message:
  simpleWarning in open.connection(con, "rb"): cannot open URL 'https://clinicaltrials.gov/api/int/studies/NCT02110043/history/1': HTTP status was '421 Unknown Error'
   
  
  Saving _problems/test-clinicaltrials_gov_version_pcdate_precision-12.R
  Version caused a warning: NCT02110043 version 1
  Here's the original warning message:
  simpleWarning in open.connection(con, "rb"): cannot open URL 'https://clinicaltrials.gov/api/int/studies/NCT02110043/history/1': HTTP status was '421 Unknown Error'
   
  
  Saving _problems/test-clinicaltrials_gov_version_pcdate_type-12.R
  Unable to connect to clinicaltrials.gov
  Saving _problems/test-clinicaltrials_gov_version_results_posted-14.R
  Version caused a warning: NCT02110043 version 1
  Here's the original warning message:
  simpleWarning in open.connection(con, "rb"): cannot open URL 'https://clinicaltrials.gov/api/int/studies/NCT02110043/history/1': HTTP status was '421 Unknown Error'
   
  
  Saving _problems/test-clinicaltrials_gov_version_sex-12.R
  NCT02586649 - 4 of 4
  2026-02-26 15:40:54.089428 NCT02586649 processed (4 versions, 100%)
  Rows: 1 Columns: 29
  -- Column specification --------------------------------------------------------
  Delimiter: ","
  chr  (20): nctid, overall_status, study_start_date_precision, primary_comple...
  dbl   (3): version_number, total_versions, enrolment
  lgl   (3): accepts_healthy_volunteers, whystopped, results_posted
  date  (3): version_date, study_start_date, primary_completion_date
  
  i Use `spec()` to retrieve the full column specification for this data.
  i Specify the column types or set `show_col_types = FALSE` to quiet this message.
  Unable to connect to clinicaltrials.gov
  Version caused a warning: NCT04338971 version 2
  Here's the original warning message:
  simpleWarning in open.connection(con, "rb"): cannot open URL 'https://clinicaltrials.gov/api/int/studies/NCT04338971/history/2': HTTP status was '421 Unknown Error'
   
  
  Saving _problems/test-overall_status_lengths-4.R
  [ FAIL 10 | WARN 0 | SKIP 0 | PASS 21 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-clinicaltrials_gov_version_criteria.R:9:9'): ClinicalTrials.gov criteria downloads correctly ──
  Error in `version$criteria`: $ operator is invalid for atomic vectors
  Backtrace:
      ▆
   1. └─testthat::expect_equal(version$criteria, "<p>Inclusion Criteria (MCI patients):</p><ul><li>right handedness</li><li><p>amnestic and amnestic plus MCI with:</p><ol><li>subjective memory impairment;</li><li>objective memory difficulties, at least 1 SD below gender, age and education adjusted standard values;</li><li>relatively normal performance in other cognitive domains;</li><li>no constraints in activities of daily livings</li><li>age: 50-90 years</li></ol></li></ul><p>Exclusion Criteria:</p><ul><li>severe internal or psychiatric disease</li><li>epilepsy</li><li>other severe neurological diseases, e.g.\nprevious major stroke or brain tumor</li><li>DMS-IV manifest dementia</li><li>contraindication for MRT (claustrophobia, metallic implants, tattoos)</li></ul>") at test-clinicaltrials_gov_version_criteria.R:9:9
   2.   └─testthat::quasi_label(enquo(object), label)
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Error ('test-clinicaltrials_gov_version_lead_sponsor.R:9:9'): ClinicalTrials.gov contacts downloads correctly ──
  Error in `version$lead_sponsor`: $ operator is invalid for atomic vectors
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test-clinicaltrials_gov_version_lead_sponsor.R:9:9
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─jsonlite::fromJSON(version$lead_sponsor)
  ── Error ('test-clinicaltrials_gov_version_orgstudyid.R:9:9'): ClinicalTrials.gov org study ID downloads correctly ──
  Error in `version$orgstudyid`: $ operator is invalid for atomic vectors
  Backtrace:
      ▆
   1. └─testthat::expect_equal(version$orgstudyid, "LOCATO-MCI-tDCS") at test-clinicaltrials_gov_version_orgstudyid.R:9:9
   2.   └─testthat::quasi_label(enquo(object), label)
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Error ('test-clinicaltrials_gov_version_overall_contacts.R:9:9'): ClinicalTrials.gov contacts downloads correctly ──
  Error in `version$overall_contacts`: $ operator is invalid for atomic vectors
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test-clinicaltrials_gov_version_overall_contacts.R:9:9
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─jsonlite::fromJSON(version$overall_contacts)
  ── Error ('test-clinicaltrials_gov_version_pcdate_none.R:9:9'): ClinicalTrials.gov empty primary completion date ──
  Error in `version$pcdate`: $ operator is invalid for atomic vectors
  Backtrace:
      ▆
   1. └─testthat::expect_equal(is.na(version$pcdate), TRUE) at test-clinicaltrials_gov_version_pcdate_none.R:9:9
   2.   └─testthat::quasi_label(enquo(object), label)
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Error ('test-clinicaltrials_gov_version_pcdate_precision.R:9:9'): ClinicalTrials.gov primary completion date precision downloads correctly ──
  Error in `version$pcdate_precision`: $ operator is invalid for atomic vectors
  Backtrace:
      ▆
   1. └─testthat::expect_equal(version$pcdate_precision, "month") at test-clinicaltrials_gov_version_pcdate_precision.R:9:9
   2.   └─testthat::quasi_label(enquo(object), label)
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Error ('test-clinicaltrials_gov_version_pcdate_type.R:9:9'): ClinicalTrials.gov primary completion date type downloads correctly ──
  Error in `version$pcdate_type`: $ operator is invalid for atomic vectors
  Backtrace:
      ▆
   1. └─testthat::expect_equal(version$pcdate_type, "ESTIMATED") at test-clinicaltrials_gov_version_pcdate_type.R:9:9
   2.   └─testthat::quasi_label(enquo(object), label)
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Error ('test-clinicaltrials_gov_version_results_posted.R:10:9'): ClinicalTrials.gov results posted downloads correctly ──
  Error in `version_true$results_posted`: $ operator is invalid for atomic vectors
  Backtrace:
      ▆
   1. └─testthat::expect_equal(...) at test-clinicaltrials_gov_version_results_posted.R:10:9
   2.   └─testthat::quasi_label(enquo(object), label)
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Error ('test-clinicaltrials_gov_version_sex.R:9:9'): ClinicalTrials.gov sex downloads correctly ──
  Error in `version$sex`: $ operator is invalid for atomic vectors
  Backtrace:
      ▆
   1. └─testthat::expect_equal(version$sex, "ALL") at test-clinicaltrials_gov_version_sex.R:9:9
   2.   └─testthat::quasi_label(enquo(object), label)
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  ── Error ('test-overall_status_lengths.R:2:3'): Overall status lengths parse correctly ──
  Error in `versiondata$ostatus`: $ operator is invalid for atomic vectors
  Backtrace:
      ▆
   1. ├─cthist::clinicaltrials_gov_download("NCT04338971", quiet = TRUE) at test-overall_status_lengths.R:2:3
   2. │ ├─... %>% ...
   3. │ └─tibble::tribble(...)
   4. │   └─tibble:::extract_frame_data_from_dots(...)
   5. │     └─rlang::list2(...)
   6. └─readr::write_csv(., file = output_filename, append = TRUE)
   7.   └─readr::write_delim(...)
   8.     ├─base::stopifnot(is.data.frame(x))
   9.     └─base::is.data.frame(x)
  
  [ FAIL 10 | WARN 0 | SKIP 0 | PASS 21 ]
  Error:
  ! Test failures.
  Execution halted