Running ‘testthat.R’ [283s/433s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(DrugExposureDiagnostics)
  > 
  > test_check("DrugExposureDiagnostics")
  trying URL 'https://raw.githubusercontent.com/darwin-eu/EunomiaDatasets/main/datasets/GiBleed/GiBleed_5.3.zip'
  trying URL 'https://raw.githubusercontent.com/darwin-eu/EunomiaDatasets/main/datasets/GiBleed/GiBleed_5.3.zip'
  Content type 'application/zip' length 6848518 bytes (6.5 MB)
  ==================================================
  downloaded 6.5 MB
  
  attempting to extract and load /tmp/RtmpqQGqgv/working_dir/RtmpoiWU0N/GiBleed_5.3.zip
  population after earliestStartDate smaller than sample, ignoring date for sampling
  Joining with `by = join_by(ingredient_concept_id)`
  Joining with `by = join_by(ingredient_concept_id)`
  population after earliestStartDate smaller than sample, ignoring date for sampling
  Joining with `by = join_by(ingredient_concept_id)`
  Joining with `by = join_by(ingredient_concept_id)`
  Joining with `by = join_by(ingredient_concept_id)`
  Joining with `by = join_by(ingredient_concept_id)`
  population after earliestStartDate smaller than sample, ignoring date for sampling
  Joining with `by = join_by(ingredient_concept_id)`
  Joining with `by = join_by(ingredient_concept_id)`
  population after earliestStartDate smaller than sample, ignoring date for sampling
  Joining with `by = join_by(ingredient_concept_id)`
  Joining with `by = join_by(ingredient_concept_id)`
  population after earliestStartDate smaller than sample, ignoring date for sampling
  Joining with `by = join_by(ingredient_concept_id)`
  Joining with `by = join_by(ingredient_concept_id)`
  population after earliestStartDate smaller than sample, ignoring date for sampling
  Joining with `by = join_by(ingredient_concept_id)`
  Joining with `by = join_by(ingredient_concept_id)`
  population after earliestStartDate smaller than sample, ignoring date for sampling
  Joining with `by = join_by(ingredient_concept_id)`
  Joining with `by = join_by(ingredient_concept_id)`
  Joining with `by = join_by(ingredient_concept_id)`
  Joining with `by = join_by(ingredient_concept_id)`
  Time taken: 0 minutes and 0 seconds
  testMessage
  [ FAIL 1 | WARN 22 | SKIP 1 | PASS 226 ]
  
  ══ Skipped tests (1) ═══════════════════════════════════════════════════════════
  • Sys.getenv("TESTDB_USER") == "" is TRUE (1): 'test-SyntheaSqlServer.R:5:3'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-Eunomia.R:3:3'): execute all checks, default ingredient, verbose ──
  Error in `utils::download.file(url = paste(baseUrl, datasetName, zipName, 
      sep = "/"), destfile = file.path(pathToData, zipName))`: cannot open URL 'https://raw.githubusercontent.com/darwin-eu/EunomiaDatasets/main/datasets/GiBleed/GiBleed_5.3.zip'
  Backtrace:
      ▆
   1. └─DrugExposureDiagnostics::getEunomiaCdm() at test-Eunomia.R:3:2
   2.   ├─utils::capture.output(CDMConnector::downloadEunomiaData(pathToData = Sys.getenv("EUNOMIA_DATA_FOLDER")))
   3.   │ └─base::withVisible(...elt(i))
   4.   └─CDMConnector::downloadEunomiaData(pathToData = Sys.getenv("EUNOMIA_DATA_FOLDER"))
   5.     └─utils::download.file(...)
  
  [ FAIL 1 | WARN 22 | SKIP 1 | PASS 226 ]
  Error: Test failures
  In addition: There were 19 warnings (use warnings() to see them)
  Execution halted
  There were 21 warnings (use warnings() to see them)