tests/testthat/elementsApp/tests/zoomIn.R

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

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