output$main_data <- renderUI({
mainPanel(id="datatabs",
tabsetPanel(
tabPanel("Import", htmlOutput("data_import")),
tabPanel("Transform", htmlOutput("data_transform")),
tabPanel("Filter", htmlOutput("data_filter")),
tabPanel("Inspect", htmlOutput("data_inspect")),
tabPanel("State", htmlOutput("data_state"))
)
)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.