title: How to wrap inputs within SelectInput from shiny using html?
body: <p>I am using a selectinput within Shiny R, to allow the user to select multiple input items. However, the items that I have are too long and as a result get cut off due to the size of the box I set (i.e. 400px). I am trying to use html code to alter the names by wrapping the words so that if the input item is longer than the width of the box, it will wrap to the next line. However, I am getting no change with the addition of the HTML tag. Any suggestions?</p>
  
  <pre><code> selectInput( paste0("siFactors_",i), 
   choices = theCatFactorNameList, selectize=FALSE, multiple = TRUE, width = 400),  
   tags$head( tags$style(HTML(paste0(paste0(".siFactors_", i),  "{ word-wrap: break-word}")))
   )
  </code></pre>