use selectize option in shiny