launch <- function(){
if (!interactive())
stop('The Agroft package is designed for interactive use only', call.=TRUE)
shiny::runApp(system.file('app', package='agroft'))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.