Nothing
app <- ShinyDriver$new("../")
app$snapshotInit("two_images")
app$uploadFile(image1 = c(system.file('extdata', 'Image0003_.jpg', package = 'colocr'),
system.file('extdata', 'Image0001_.jpg', package = 'colocr')))
app$setInputs(threshold = 90, timeout_ = 10000)
app$setInputs(roi_num = 3, timeout_ = 10000)
app$setInputs(name = "LC3", timeout_ = 10000)
app$setInputs(add = "click", timeout_ = 10000)
app$setInputs(add2 = "click", timeout_ = 10000)
app$snapshot()
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.