title: Multiple add_markers R plotly
body: <p>I am trying to display on the same plot ( same <code>x.axis</code> and same <code>y.axis</code>) for different color of this data.</p>
  
  <p>My first code :</p>
  
  <pre><code>fig &lt;- plot_ly(partitions, x = ~`_Dim.1`, y = ~`_Dim.2`, name = 'Complete link : Data Scaled, K = 2', type = 'scatter', mode = 'markers',
                marker = list(size=12,symbol=0,color=~`_z_comp_scale`),
                hoverinfo = 'text',
                text = ~paste('&lt;/br&gt; Pays: ', code_country)) %&gt;%
    add_trace(marker=list(size=12,symbol=1,color=~`_z_comp`),inherit=TRUE,name="complet : K = 2") %&gt;% 
    add_markers(marker=list(size=12,symbol=2,color=~`_z_comp2`),name="complet : K = 5") %&gt;% 
    add_markers(marker=list(size=12,symbol=3,color=~`_z_avg_scale`),name="average : data Scaled, K = 3") %&gt;%
    add_markers(marker=list(size=12,symbol=4,color=~`_z_avg_scale2`),name="average : data Scaled, K = 8") %&gt;%
    add_markers(marker=list(size=12,symbol=5,color=~`_z_avg`),name="average :  K = 2") %&gt;%
    add_markers(marker=list(size=12,symbol=6,color=~`_z_avg2`),name="average :  K = 5") %&gt;%
    add_markers(marker=list(size=12,symbol=7,color=~`_z_ward_scale`),name="ward : data scaled, k = 2") %&gt;%
    add_markers(marker=list(size=12,symbol=8,color=~`_z_ward`),name="ward : k = 2") %&gt;%
    add_markers(marker=list(size=12,symbol=9,color=~`_z_ward2`),name="ward : k = 5") 
  
  fig
  </code></pre>
  
  <p>Give me that : <a href="https://i.stack.imgur.com/sKmtA.png" rel="nofollow noreferrer">Plot</a></p>
  
  <p>But i want change the color because for a partition with eight group it's not very clear for eyes with the actual color.</p>
  
  <p>So i try this:</p>
  
  <pre><code>fig &lt;- plot_ly(partitions, x = ~`_Dim.1`, y = ~`_Dim.2`, name = 'Complete link : Data Scaled, K = 2', type = 'scatter', mode = 'markers',
                size=12,symbol=0,colors=couleurs,color=~`_z_comp_scale`,
                hoverinfo = 'text',
                text = ~paste('&lt;/br&gt; Pays: ', code_country)) %&gt;%
    add_markers(marker=list(),size=12,symbol=0,colors=couleurs,color=~`_z_comp`,name="complet : K = 2") %&gt;% 
    add_markers(size=12,symbol=0,colors=couleurs,color=~`_z_comp2`,name="complet : K = 5") %&gt;% 
    add_markers(size=12,symbol=3,colors=couleurs,color=~`_z_avg_scale`,name="average : data Scaled, K = 3") %&gt;%
    add_markers(size=12,symbol=3,colors=couleurs,color=~`_z_avg_scale2`,name="average : data Scaled, K = 8") %&gt;%
    add_markers(size=12,symbol=3,colors=couleurs,color=~`_z_avg`,name="average :  K = 2") %&gt;%
    add_markers(size=12,symbol=3,colors=couleurs,color=~`_z_avg2`,name="average :  K = 5") %&gt;%
    add_markers(size=12,symbol=2,colors=couleurs,color=~`_z_ward_scale`,name="ward : data scaled, k = 2") %&gt;%
    add_markers(size=12,symbol=2,colors=couleurs,color=~`_z_ward`,name="ward : k = 2") %&gt;%
    add_markers(size=12,symbol=2,colors=couleurs,color=~`_z_ward2`,name="ward : k = 5") 
  fig &lt;- fig %&gt;% layout(legend = l)
  fig
  </code></pre>
  
  <p>The result is this: <a href="https://i.stack.imgur.com/1ucSQ.png" rel="nofollow noreferrer">Plot</a></p>
  
  <p>I want to delete the the topside of legend.</p>
  
  <p>I think i'am very close to my goal, any help please? thank you for your attention.</p>
  
  <p>Max Mamazita</p>