In some cases a menuInput()
isn't enough and you will want to build a more
complex dropdown menu.
To recreate a menut input.
dropdown( label = "Choices", buttonInput(id = "choice1", label = "Choice 1"), buttonInput(id = "choice2", label = "Choice 2"), buttonInput(id = "choice3", label = "Choice 3") )
dropdown( label = "Choices", linkInput(id = "link1", label = "Choice 1"), linkInput(id = "link2", label = "Choice 2") )
dropdown( label = "Sections", h6("Section 1"), buttonInput(id = "a", label = "Option A"), buttonInput(id = "b", label = "Option B"), hr(), h6("Section 2"), buttonInput(id = "c", label = "Option C"), buttonInput(id = "d", label = "Option D") )
dropdown( label = "Up!", direction = "up", buttonInput(id = "up1", label = "Choice 1"), buttonInput(id = "up2", label = "Choice 2") )
dropdown( label = "Sign in", formInput( id = "login", formGroup( label = "Username / Email", textInput( type = "email", id = "user" ) ), formGroup( label = "Password", textInput( type = "password", id = "pass" ) ), formSubmit( label = "Sign in", value = "signin" ) ) %>% padding(3, 4, 3, 4) )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.