mod_open_dataset | R Documentation |
A shiny Module.
mod_open_dataset_ui(id)
mod_open_dataset_server(id)
id |
xxx |
if (interactive()){
ui <- fluidPage(
tagList(
mod_open_dataset_ui("qf_file"),
textOutput('res')
)
)
server <- function(input, output, session) {
rv <- reactiveValues(
obj = NULL
)
rv$obj <- mod_open_dataset_server("qf_file")
output$res <- renderText({
rv$obj()
paste0('Names of the datasets: ', names(rv$obj()))
})
}
shinyApp(ui, server)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.