library(shiny)
getApp2 <- function(self){
source("test2/ui.R", local = TRUE)
source("test2/server.R", local = TRUE)
return(shinyApp(ui = uiFunc(), server = serverFunc))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.