R/inst_qc_ol_ui.R

Defines functions inst_qc_ol_ui

inst_qc_ol_ui<-function(){
require(shiny)
shinyUI(fluidPage(
  titlePanel("Instrument QC Outliers"),
  mainPanel(width = "100%",
            fluidRow(
              selectInput("plat", "platform", c("XFp", "XFe24", "XFe96")),

              plotOutput('plot1')
            ))
))
}
JARS3N/LiveLongAndProsper documentation built on June 21, 2020, 12:49 p.m.