Learn R Programming

spsComps (version 0.3.3.0)

textInputGroup: Bootstrap 3 text input group

Description

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

Usage

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

Value

text input group component

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

Details

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

Examples

Run this code
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)
}

Run the code above in your browser using DataLab