f7Stepper
creates a stepper input.
updateF7Stepper
changes the value of a stepper input on the client.
Usage
f7Stepper(
inputId,
label,
min,
max,
value,
step = 1,
fill = FALSE,
rounded = FALSE,
raised = FALSE,
size = NULL,
color = NULL,
wraps = FALSE,
autorepeat = TRUE,
manual = FALSE,
decimalPoint = 4,
buttonsEndInputMode = TRUE
)
updateF7Stepper(
inputId,
min = NULL,
max = NULL,
value = NULL,
step = NULL,
fill = NULL,
rounded = NULL,
raised = NULL,
size = NULL,
color = NULL,
wraps = NULL,
decimalPoint = NULL,
autorepeat = NULL,
manual = NULL,
session = shiny::getDefaultReactiveDomain()
)
Arguments
- inputId
Stepper input id.
- label
Stepper label.
- min
Stepper minimum value.
- max
Stepper maximum value.
- value
Stepper value. Must belong to
\[min, max\]
.- step
Increment step. 1 by default.
- fill
Whether to fill the stepper. FALSE by default.
- rounded
Whether to round the stepper. FALSE by default.
- raised
Whether to put a relied around the stepper. FALSE by default.
- size
Stepper size: "small", "large" or NULL.
- color
Stepper color: NULL or "red", "green", "blue", "pink", "yellow", "orange", "grey" and "black".
- wraps
In wraps mode incrementing beyond maximum value sets value to minimum value, likewise, decrementing below minimum value sets value to maximum value. FALSE by default.
- autorepeat
Pressing and holding one of its buttons increments or decrements the stepper’s value repeatedly. With dynamic autorepeat, the rate of change depends on how long the user continues pressing the control. TRUE by default.
- manual
It is possible to enter value manually from keyboard or mobile keypad. When click on input field, stepper enter into manual input mode, which allow type value from keyboar and check fractional part with defined accurancy. Click outside or enter Return key, ending manual mode. TRUE by default.
- decimalPoint
Number of digits after dot, when in manual input mode.
Disables manual input mode on Stepper's minus or plus button click.
- session
The Shiny session object, usually the default value will suffice.
Examples
library(shiny)
library(shinyMobile)
app <- shinyApp(
ui = f7Page(
title = "Stepper app",
f7SingleLayout(
navbar = f7Navbar(title = "updateF7Stepper"),
f7Block(f7Button(inputId = "update", label = "Update stepper")),
f7List(
strong = TRUE,
inset = TRUE,
outline = TRUE,
f7Stepper(
inputId = "stepper",
label = "My stepper",
min = 0,
max = 10,
size = "small",
value = 4,
wraps = TRUE,
autorepeat = TRUE,
rounded = FALSE,
raised = FALSE,
manual = FALSE
)
),
verbatimTextOutput("test")
)
),
server = function(input, output, session) {
output$test <- renderPrint(input$stepper)
observeEvent(input$update, {
updateF7Stepper(
inputId = "stepper",
value = 0.1,
step = 0.01,
size = "large",
min = 0,
max = 1,
wraps = FALSE,
autorepeat = FALSE,
rounded = TRUE,
raised = TRUE,
color = "pink",
manual = TRUE,
decimalPoint = 2
)
})
}
)
if (interactive() || identical(Sys.getenv("TESTTHAT"), "true")) app