Bootstrap 3 text input group — textInputGroup • spsComps

Text input group and custom widgets append to left ar/and right

textInputGroup(
  textId,
  label = "",
  value = "",
  placeholder = "enter text",
  left_text = NULL,
  right_text = NULL,
  style = "width: 100%;"
)

Arguments

textId: text box id
label: text label for this input group
value: default value for the text input
placeholder: default placeholder text for the text input if no value
left_text: text or icon add to the left side
right_text: text or icon add to the right side
style: additional style add to the group

Value

text input group component

Details

If no text is specified for both left and right, the return is almost identical to clearableTextInput

Examples

if(interactive()){

    ui <- fluidPage(
        textInputGroup("id1", "left", left_text = "a"),
        textInputGroup("id2", "right", right_text = "b"),
        textInputGroup("id3", "both", left_text = "$", right_text = ".00"),
        textInputGroup("id4", "none"),
        textInputGroup("id5", "icon", left_text = icon("house")),
    )

    server <- function(input, output, session) {

    }

    shinyApp(ui, server)
}