tests/testthat/shinytest/css_class/tests/css_classTest.R

app <- ShinyDriver$new("../")
app$snapshotInit("css_classTest")

app$setInputs(add = "click")
app$snapshot()
app$setInputs(remove = "click")
app$snapshot()
app$setInputs(toggle = "click")
app$snapshot()
app$setInputs(toggle_cond = "click")
app$snapshot()

Try the dqshiny package in your browser

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

dqshiny documentation built on May 2, 2019, 1:43 p.m.