tests/testthat/tests/basicRunSpot.R

app <- ShinyDriver$new("../", seed = 1)
app$snapshotInit("basicRunSpot")

app$setInputs(tabs = "spotConfig")
try(app$setInputs(tabs = "runMode"), silent = T)
app$setInputs(runSpotIter = "click")
app$snapshot(list(output = "resultTable"))
frehbach/spotGUI documentation built on June 30, 2019, 11:18 p.m.