library("shiny")
library("purrple")
page <- purrplePage(fluidPage)
shinyUI(page(
sidebarPanel(
htmlOutput( "movie_description")
),
mainPanel(
htmlOutput( "search_results" )
)
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.