jsmodule (version 1.6.11)

csvFileInput: csvFileInput: Shiny module UI for file upload.

Description

Shiny module UI for file upload supporting csv, xlsx, sav, sas7bdat, and dta formats. It provides UI outputs for various data manipulation options.

Usage

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

Value

A Shiny UI object.

Arguments

id

A string, the module id.

label

A string, the label for the file input, Default: 'Upload data (csv/xlsx/sav/sas7bdat/dta)'

Details

This function only defines the UI. The corresponding server function, `csvFile`, handles the logic.

Examples

if (interactive()) {
  library(shiny)
  library(DT)
  library(jstable)

  ui <- fluidPage(
    sidebarLayout(
      sidebarPanel(
        csvFileInput("datafile")
      ),
      mainPanel(
        tabsetPanel(
          type = "pills",
          tabPanel("Data", DTOutput("data")),
          tabPanel("Label", DTOutput("data_label"))
        )
      )
    )
  )

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

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

    output$label <- renderDT({
      data_info()$label
    })
  }
  shinyApp(ui, server)
}