This commit is contained in:
2022-07-13 15:28:48 +02:00
parent 2359d6911d
commit e86ada3330
+1 -1
View File
@@ -11,7 +11,7 @@ ui <- fluidPage(
navbarPage("Apps", navbarPage("Apps",
tabPanel("Translation", tabPanel("Translation",
sidebarPanel( sidebarPanel(
fileInput("file1", "Upload file (fasta, csv o xlsx)", multiple = FALSE), fileInput("file1", "Upload file (fasta, csv or xlsx)", multiple = FALSE),
selectInput("spec", label = h3("Specie"), selectInput("spec", label = h3("Specie"),
choices = list("Human" = 1, "E. Coli" = 2), choices = list("Human" = 1, "E. Coli" = 2),
selected = 1), selected = 1),