powered by
appshot(app, file = "webshot.png", ..., port = getOption("shiny.port"), envvars = NULL)
.png
.pdf
.jpeg
webshot
if (interactive()) { appdir <- system.file("examples", "01_hello", package="shiny") appshot(appdir, "01_hello.png") }
Run the code above in your browser using DataLab