title: R Shiny: How can I format choices in a a selectInput drop box?
body: <p>I am building a shiny page, and I would like to give the users some control over graphical elements - colors, symbol sizes etc. I am putting in a drop box to let the user control the colors of points in a graph. I would like the names of the colors to appear in color themselves. The <code>ui.r</code> has:</p>
  
  <pre><code>selectInput("PColor","Choose a Color:",
  choices=list(HTML('&lt;p style="color: blue"&gt; blue &lt;/p&gt;'),
  HTML('&lt;p style="color: red"&gt; red &lt;/p&gt;'),selected="blue")
  </code></pre>
  
  <p>However, the HTML codes are not evaluated. Instead the dropdown choices have <code>'&lt;p style="color: blue"&gt; blue &lt;/p&gt;'</code> and similar for red. Is there anyway I can format each of the individual choices in this list?  </p>
  
  <p>Thanks</p>