Create an input control for entry of numeric values
numericInput( inputId, label, value, min =NA, max =NA, step =NA, width =NULL)
Arguments
inputId: The input slot that will be used to access the value.
label: Display label for the control, or NULL for no label.
value: Initial value.
min: Minimum allowed value
max: Maximum allowed value
step: Interval to use when stepping between min and max
width: The width of the input, e.g. '400px', or '100%'; see validateCssUnit().
Returns
A numeric input control that can be added to a UI definition.
Server value
A numeric vector of length 1.
Examples
## Only run examples in interactive R sessionsif(interactive()){ui <- fluidPage( numericInput("obs","Observations:",10, min =1, max =100), verbatimTextOutput("value"))server <-function(input, output){ output$value <- renderText({ input$obs })}shinyApp(ui, server)}