tests/testthat/boxesApp/tests/boxesApp.R

app <- ShinyDriver$new("../", seed = 42)
app$snapshotInit("boxesApp")

app$setInputs(sidebar = "Output")
app$snapshot()
app$setInputs(title = "Test")
app$snapshot()
mYstar/easyshiny documentation built on June 21, 2019, 10:37 a.m.