diff --git a/invivos/app.R b/invivos/app.R index 6e95cf1..1451daa 100644 --- a/invivos/app.R +++ b/invivos/app.R @@ -61,7 +61,7 @@ ui <- fluidPage( sliderInput("errorbar-width", "% Ancho errorbars", min=0.05, max=1, step=0.05, value=0.05), sliderInput("point-size", "Tamaño puntos", min=1, max=10, step=1, value=3), sliderInput("font-size", "Tamaño textos", min=5, max=30, step=1, value=11), - checkboxInput(inputId = "logscale", label="Escala logarítmica", value=F), + checkboxInput(inputId = "logscale", label="Escala logarítmica eje Y", value=F), checkboxInput(inputId = "legend", label = "Mostrar llegenda", value = T), selectInput("theme", "Seleccionar Tema", selected="BW", choices=c("BW", "Default", "Classic")), downloadButton("downloadPicture", "Exportar")