title: Dynamic number of highcharter plots
body: <p>I'm following <a href="https://gist.github.com/wch/5436415/" rel="nofollow">this example</a> to plot multiple graphs depending of different parameters (as data frame columns). So the case is that the number of plots to do will vary each day.</p>
  
  <p>I have modified the code to use Highcharter to get javascript charts instead of basic plots but it doesn't work.</p>
  
  <p>Also I would like to know what I have to add to this code to plots charts in 2,3 or 4 columns?</p>
  
  <p>Thanks</p>
  
  <p><strong>ui.R</strong></p>
  
  <pre><code>fluidPage(
    # Application title
    titlePanel("Hello World!"),
  
    # Show a plot
    fluidRow(      
      column(width = 6,
             highchartOutput("hcontainer", height = "400px")
      ) 
    )
  )
  </code></pre>
  
  <p><strong>server.R</strong></p>
  
  <pre><code>get_plot_output_list &lt;- function() {
      plot_output_list &lt;- lapply(1:NCOL(df), FUN = function(i) {
        plot_output_object &lt;- highchartOutput("hcontainer")
        plot_output_object &lt;- renderHighchart({
          hc &lt;- highchart() %&gt;%
            hc_add_serie(name = "df name", data = df)
          return(hc)
        })
      })
      do.call(tagList, plot_output_list) # needed to display properly.
      return(plot_output_list)
    }
  
  observe({
      output$hcontainer &lt;- renderUI({ get_plot_output_list() })
      #output$hcontainer &lt;- renderHighchart({ get_plot_output_list() })
    })
  </code></pre>