añadir randomizado 1

2020-11-03 18:43:22 +01:00
parent 1e0c476568
commit c47ff6ff12
1 changed files with 2 additions and 1 deletions
@@ -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")),
                  sliderInput("ncages", "Cajas", min=1, max=10, value=1),
                  downloadButton("downloadData", "Descargar Excel")
-                  )
+                  ),
+                plotOutput("distPlot")
              ),
              tabPanel("Análisis")
              )