csvFileInput: csvFileInput: Module UI function
In jinseob2kim/shinyhealth: Shiny modules for health data analysis. (shinyhealth)

Description Usage Arguments Details Value Examples

Shiny module UI for csv file input

1	csvFileInput(id, label = "CSV file")

`id`	The namespace for the module
`label`	Label, Default: 'CSV file'

DETAILS

UI

library(shiny)
# Only run examples in interactive R sessions

if(interactive()){
  
  ui <- fluidPage(
    sidebarLayout(
      sidebarPanel(
        csvFileInput("datafile", "User data (.csv format)")
      ),
      mainPanel(
        DT::dataTableOutput("table")
      )
    )
  )
  server <- function(input, output, session) {
    datafile <- callModule(csvFile, "datafile",
                           stringsAsFactors = FALSE)
    
    output$table <- DT::renderDataTable({
      datafile()
    })
  }
  
  shinyApp(ui, server)
    
}