csvFileInput: csvFileInput: Shiny module UI for file upload.
In leevenstar/jstest: 'RStudio' Addins and 'Shiny' Modules for Medical Research

Description Usage Arguments Details Value Examples

Shiny module UI for file(csv or xlsx) upload.

1	csvFileInput(id, label = "Upload data (csv/xlsx/sav/sas7bdat/dta)")

`id`	id
`label`	label, Default: 'csv/xlsx/sav/sas7bdat/dta file'

Shiny module UI for file(csv or xlsx) upload.

library(shiny);library(DT);library(data.table);library(readxl);library(jstable)
ui <- fluidPage(
  sidebarLayout(
    sidebarPanel(
      csvFileInput("datafile")
    ),
    mainPanel(
      tabsetPanel(type = "pills",
                  tabPanel("Data", DTOutput("data")),
                  tabPanel("Label", DTOutput("data_label", width = "100%"))
                 )
   )
 )
)

server <- function(input, output, session) {
  data <- callModule(csvFile, "datafile")

  output$data <- renderDT({
    data()$data
  })

  output$label <- renderDT({
    data()$label
  })
}