tests/testthat/test_app_file.R

In sk-sahu/EcoGEx: Ecotype-specific Gene Expression

context("app-file")

library(shinytest)


test_that("If the app files are present", {

  appDir <- system.file("app", package = "EcoGEx")

  expect_pass(testApp(appDir, compareImages = FALSE))

})