selectInput( id = "select1", choices = c("Choice 1", "Choice 2", "Choice 3"), values = as.character(c(1, 2, 3)) )
groupSelectInput( id = "select2", choices = as.character(1:5), left = "$", right = ".00" )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.