tests/testthat/test-app-function.R

In celehs/phecodemap: Visualization for Phecode Mapping with ICD-9 and ICD-10-cm Codes

context("app-function")
# This file is for testing the applications in the apps/ directory.

library(shinytest)

test_that("run_app() works", {
  # Don't run these tests on the CRAN build servers
  skip_on_cran()
  
  # Use compareImages=FALSE because the expected image screenshots were created
  # on a Mac, and they will differ from screenshots taken on the CI platform,
  # which runs on Linux.
  expect_pass(testApp(test_path("apps/phecodemap/"), compareImages = FALSE))
})