textInputGroup: Bootstrap 3 text input group

Description Usage Arguments Details Value Examples

View source: R/inputs.R

Description

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

Usage

1
2
3
4
5
6
7
8
9
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

Details

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

Value

text input group component

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
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("home")),
    )

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

    }

    shinyApp(ui, server)
}

spsComps documentation built on Feb. 3, 2022, 1:07 a.m.