tests/testthat/setup.R

library(Eunomia)
connectionDetails <- getEunomiaConnectionDetails()
Eunomia::createCohorts(connectionDetails)

withr::defer(
  {
    # Remove the Eunomia database:
    unlink(connectionDetails$server())
  },
  testthat::teardown_env()
)
OHDSI/IcTemporalPatternDiscovery documentation built on Sept. 16, 2022, 1:11 p.m.