R/pseudovol_ui.R

Defines functions pseudovol_ui

pseudovol_ui<-function(){
library(shiny)
shinyUI(fluidPage(
    titlePanel("Change Pseudo Volume"),
    mainPanel(
        numericInput("chamber", "chamber volume", NULL),
        shiny::fileInput("FILE", "upload file"),
        downloadButton("export", "export")
    )
))
}
JARS3N/LiveLongAndProsper documentation built on June 21, 2020, 12:49 p.m.