añadir randomizado 1

This commit is contained in:
marcelcosta
2020-11-03 18:43:22 +01:00
parent 1e0c476568
commit c47ff6ff12
+2 -1
View File
@@ -18,7 +18,8 @@ ui <- fluidPage(
selectInput(inputId = "measure_sys", "Sistema de medida", selected = "L-W-D", choices = c("L-W-D","Min-Max","Absorbance")), selectInput(inputId = "measure_sys", "Sistema de medida", selected = "L-W-D", choices = c("L-W-D","Min-Max","Absorbance")),
sliderInput("ncages", "Cajas", min=1, max=10, value=1), sliderInput("ncages", "Cajas", min=1, max=10, value=1),
downloadButton("downloadData", "Descargar Excel") downloadButton("downloadData", "Descargar Excel")
) ),
plotOutput("distPlot")
), ),
tabPanel("Análisis") tabPanel("Análisis")
) )