如何使用html来包装SelectInput中的输入？

Question

我在Shiny R中使用selectinput，允许用户选择多个输入项。但是，我拥有的物品太长，因此由于我设置的盒子的尺寸（即400px）而被切断。我试图通过包装单词来使用html代码来改变名称，这样如果输入项长于框的宽度，它将换行到下一行。但是，添加HTML标记后我没有任何变化。有什么建议吗？

 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}")))
 )

Answer 1

试试这个

  tags$style(    type='text/css', 
                 ".selectize-input { word-wrap: break-word;}"
                  )