menuInput( id = "menu1", label = "Menu", choices = c( "Choice 1", "Choice 2", "Choice 3" ) )
navInput( id = "nav1", choices = list( "Tab 1", menuInput( id = "navOptions", label = "Tab 2", choices = c( "Option 1", "Option 2", "Option 3" ) ), "Tab 3", "Tab 4" ), values = paste0("tab", 1:4) )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.