tests/testthat/test-shiny.R

test_that("Shiny app works", {
  skip()

  appdir <- system.file(package = "DrugExposureDiagnostics", "shiny", "ResultsExplorer")
  expect_true(dir.exists(appdir))
  shinytest2::test_app(appdir)
})

Try the DrugExposureDiagnostics package in your browser

Any scripts or data that you put into this service are public.

DrugExposureDiagnostics documentation built on Sept. 16, 2025, 9:11 a.m.