inst/example_app/tests/testthat/test-basic_load.R

app <- AppDriver$new(name = "example_app")

test_that("App loads and title of app appears as expected", {
  expect_equal(
    app$get_text("title"),
    "ShinyGovstyle component showcase"
  )
})

Try the shinyGovstyle package in your browser

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

shinyGovstyle documentation built on April 13, 2026, 5:06 p.m.