-
Notifications
You must be signed in to change notification settings - Fork 0
/
ui.R
44 lines (35 loc) · 1.08 KB
/
ui.R
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
# Define UI for dataset viewer app ----
library("shinythemes")
ui <- navbarPage("mirPlot v0",theme = shinytheme("sandstone"),
tabPanel(title='Load Data',
# Sidebar layout with a input and output definitions ----
sidebarLayout(
#position = "right",
# Sidebar panel for inputs ----
sidebarPanel(
fileInput("inputfile1", "Mirbase (.gff3)",
multiple = FALSE,
accept = c(".gff3")),
actionButton("run", "RUN!"),
hr(),
downloadButton("downloadprecs", "Download Precursors Gff3"),
hr(),
downloadButton("downloadp5p", "Download 5' arms Gff3"),
hr(),
downloadButton("download3p", "Download 3' arms Gff3")
),
# Main panel for displaying outputs ----
mainPanel(
h1("Hello world!"),
h3("Input data"),
tableOutput("visualize"),
h3("Precursors"),
tableOutput("precs"),
h3("5' arms miRNAs"),
tableOutput("fiveP"),
h3("3'arms miRNAs"),
tableOutput("threeP")
)
)
)
)