title: Setting variable column size in bar highchart (Rshiny)
body: <p>I have a question relating to plot configuration in <code>Rshiny</code>. Basically, I have a bar chart and I would like to set the width for some columns and for the same X value. 
  Here is the simplified and reproducible example of the code:</p>
  
  <pre><code>library("shiny")
  library("highcharter")
  
  data(citytemp)
  
  ui &lt;- fluidPage(
      h1("Highcharter EXAMPLE"),
      fluidRow(
          column(width = 8,
                 highchartOutput("hcontainer",height = "500px")
          )
      )
  )
  
  server &lt;- function(input, output) {
      data &lt;- citytemp[,c("month","tokyo","new_york")]
      output$hcontainer &lt;- renderHighchart({
          chart &lt;-  highchart() %&gt;% 
              hc_chart(type = "bar") %&gt;% 
              hc_title(text = "Monthly Average Temperature for TOKYO") %&gt;% 
              hc_subtitle(text = "Source: WorldClimate.com") %&gt;% 
              hc_xAxis(categories = c('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun',
                                      'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec')) %&gt;% 
              hc_yAxis(title = list(text = "Temperature (C)"))
  
          hc &lt;- chart %&gt;% hc_add_series(yAxis=0,name="Tokyo",data = data$tokyo)%&gt;%
                          hc_plotOptions(bar = list(
                              pointWidth=10,
                              dataLabels = list(enabled = TRUE)
                          ))
  
          hc &lt;- hc %&gt;% hc_add_series(yAxis=0,name="NY",data = data$new_york)%&gt;%
              hc_plotOptions(bar = list(
                  pointWidth=0,
                  dataLabels = list(enabled = TRUE)
              ))
  
          return(hc)
  })
  } 
  
  shinyApp(ui = ui, server = server)
  </code></pre>
  
  <p>I investigated and a simple way to do this is to change the <code>hc_plotOptions</code>. However, when I change the <code>pointWidth</code> for one series, it is applied to both. Is there a way to apply the wanted width only to one series? Thank you very much for your help!
  Best, Madzia</p>