test_that("The app runs", {
app = shinytest::ShinyDriver$new(system.file("app", package = "whesApp"),
loadTimeout = 10000)
expect_equal(app$getTitle(), "Welsh Health Equity Solutions Platform")
app$stop()
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.