tests/testthat/test-ring_app_launch.R

context("ring_app_launch")

test_that("the function run a app", {
 
  a <- ring_app_launch()
  expect_is(a, "shiny.appobj")
  expect_type(a, "list")
  
})
JingningShi/MtreeRing documentation built on May 4, 2021, 10:06 p.m.