tests/testthat/testlayout.R

context("app-file")
library(shinytest)
test_that("layoutApp_testing", {
  skip_on_cran()
  appDir <- system.file("layout", package = "grapesAgri1")
  expect_pass(testApp(appDir, compareImages = FALSE))
})
pratheesh3780/grapesAgri1 documentation built on Dec. 7, 2023, 5:49 a.m.