| noUiSliderInput {shinyWidgets} | R Documentation |
A minimal numeric range slider with a lot of features.
noUiSliderInput(inputId, label = NULL, min, max, value, step = NULL,
tooltips = TRUE, connect = TRUE, padding = 0, margin = NULL,
limit = NULL, orientation = c("horizontal", "vertical"),
direction = c("ltr", "rtl"), behaviour = "tap", range = NULL,
pips = NULL, format = wNumbFormat(), color = NULL, inline = FALSE,
width = NULL, height = NULL)
inputId |
The |
label |
Display label for the control, or NULL for no label. |
min |
Minimal value that can be selected. |
max |
Maximal value that can be selected. |
value |
The initial value of the slider. as many cursors will be created as values provided. |
step |
numeric, by default, the slider slides fluently. In order to make the handles jump between intervals, you can use the step option. |
tooltips |
logical, display slider's value in a tooltip above slider. |
connect |
logical, vector of length |
padding |
numeric, padding limits how close to the slider edges handles can be. |
margin |
numeric, when using two handles, the minimum distance between the handles can be set using the margin option. |
limit |
numeric, the limit option is the opposite of the |
orientation |
The orientation setting can be used to set the
slider to |
direction |
|
behaviour |
Option to handle user interaction, a value or several between
|
range |
list, can be used to define non-linear sliders. |
pips |
list, used to generate points along the slider. |
format |
numbers format, see |
color |
color in Hex format for the slider. |
inline |
If |
width |
The width of the input, e.g. |
height |
The height of the input, e.g. |
a ui definition
See updateNoUiSliderInput for updating slider value server-side.
And demoNoUiSlider for examples.
## Not run:
if (interactive()) {
### examples ----
# see ?demoNoUiSlider
demoNoUiSlider("more")
### basic usage ----
library( shiny )
library( shinyWidgets )
ui <- fluidPage(
tags$br(),
noUiSliderInput(
inputId = "noui1",
min = 0, max = 100,
value = 20
),
verbatimTextOutput(outputId = "res1"),
tags$br(),
noUiSliderInput(
inputId = "noui2", label = "Slider vertical:",
min = 0, max = 1000, step = 50,
value = c(100, 400), margin = 100,
orientation = "vertical",
width = "100px", height = "300px"
),
verbatimTextOutput(outputId = "res2")
)
server <- function(input, output, session) {
output$res1 <- renderPrint(input$noui1)
output$res2 <- renderPrint(input$noui2)
}
shinyApp(ui, server)
}
## End(Not run)