title: How do I bold a text and use a font in paste function in R
body: <p>I would like to bold a text using the paste function. How do I code this in R? Thanks for looking into this.</p>
  
  <pre><code>observeEvent(input$submit3,{
  
  if (input$submit3==0) return()
  
  tagList(
    lapply(1:input$numoftrends, function(j) {
      trend.period &lt;- input[[paste0("trendDateRange", j)]]
      trend1 &lt;- substr(trend.period[1],1,7)
      trend2 &lt;- substr(trend.period[2],1,7)
  
      output[[paste0('Text', j)]] &lt;- renderText({
        #paste(" ")  ## add space in between text
        paste('Trend Date Range', j, ': ', trend1 ,' - ', trend2)
      })
    })
    )
  })
  </code></pre>