inst/UPLOADLLQC/ui.R

In JARS3N/shinyStar: shinyStar

library(shiny)

# Define UI for application that draws a histogram
shinyUI(fluidPage(

  # Application title
  titlePanel("PipeFish::Upload Instrument QC Light Leak Data"),
  mainPanel(
    p("Select directory containing xlsx files from light leak utility test"),
    checkboxInput("CB", "open and save XLSX files first", value = TRUE, width = NULL),
    actionButton('send', "Upload Data", icon = icon("cog", lib = "glyphicon"), width = NULL)
  )
)
)