shinyUI(fluidPage(
titlePanel("Simple data explorer"),
plotOutput("plot1", brush = "plot_brush", height = 250),
DT::dataTableOutput("info")
)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.