title: How would you generate multiple scatterplot in Flexdashboard R
body: <p>I have a reactive input, which takes values from 1 to 12, what I want to achieve is a plot using one column as the x variable (always), and different columns as the y variable - The input below works fine, but obviously is hardcoded, so if I use less or more than 6 variables the plot doesn't work</p>
  <pre class="lang-r prettyprint-override"><code>ggplotly(
    ggplot(table_plot(),aes(x=Streamer_Offset)) +
      geom_point(aes(y= CMP_1, color = &quot;Source 1&quot;))+
      geom_point(aes(y= CMP_2, color = &quot;Source 2&quot;))+
      geom_point(aes(y= CMP_3, color = &quot;Source 3&quot;))+
      geom_point(aes(y= CMP_4, color = &quot;Source 4&quot;))+
      geom_point(aes(y= CMP_5, color = &quot;Source 5&quot;))+
      geom_point(aes(y= CMP_6, color = &quot;Source 6&quot;))
    
  )
  
  </code></pre>
  <p>What I want to do is to put a vector of variables for example c(CMP_1,CMP_2....) etcetera, I have tried to use the following code to create a vector, and then pass on to a formula, but ggplot doesn't recognize the input</p>
  <pre><code>  l &lt;- colnames(table_plot())
    m &lt;- c(paste0(&quot;~&quot;,l))
    d &lt;- m[1:length(m)-1]
    as.formula(d)
  
  </code></pre>
  <p>Additionaly I tried ggloop and renderPlot or renderPLotly won't work with that function, as such, I'm not sure what to do as in principle, this should not be a very complicated process.</p>