Titel zur Plot-Legende hinzufügen

Question

Im folgenden Beispiel kann ich einen Titel zu der Legende in plot_ly für R hinzufügen?

mtcars %>% plot_ly(x = ~disp, y = ~mpg, color = ~factor(cyl), size = ~wt) %>% add_markers(
    hoverinfo = "text", 
    text = ~paste("Displacement = ", disp, "\nMiles Per Gallon = ", mpg) ) %>% layout(title ="Custom Hover Text") 

dank

Answer 1

Der einzige Weg, ich weiß, ist eine Anmerkung zu verwenden und es zu dem Grundstück hinzuzufügen. Wie folgt aus:

legendtitle <- list(yref='paper',xref="paper",y=1.05,x=1.1, text="Cylinders",showarrow=F) 

mtcars %>% plot_ly(x = ~disp, y = ~mpg, color = ~factor(cyl), size = ~wt) %>% 
    add_markers( hoverinfo = "text", 
       text = ~paste("Displacement=",disp, "\nMiles Per Gallon = ", mpg)) %>% 
    layout(title ="Custom Hover Text", annotations=legendtitle) 

Nachgeben:

Es ist ein bisschen schwierig, die Legende Titel zu platzieren aber nicht sicher, ob diese Platzierung würde immer funktionieren.

Ein anderer Weg wäre natürlich, ggplot und ggplotly zu verwenden und ggplot es herauszufinden.