2017-11-15 2 views
1

Ich möchte eine Textbox oder einen Informationstext zu einem Plot hinzufügen, der mit plotly erstellt wurde. Es scheint jetzt so. without textWie fügt man Textbox auf Plot in Plotly R?

Ich möchte es mit Text-Box wie folgt machen (keine Notwendigkeit, umkreisen :))).

with text-box

Der Code so weit:

p <- plot_ly(data=data.mosann, x = ~Combined, y = ~Actual)%>% 
    layout(shapes=list(type='line', x0= 0, x1= 235, y0=0, y1=235, line=list(color='red',width=3)), 
     title = 'Scatter Plot Measurements-Combined Improvements MinT', 
     xaxis = list(title = "Combined MinT", showgrid = TRUE), 
     yaxis = list(title = "Measurements", showgrid = TRUE)) 
p 
+0

nicht sicher, dass es funktioniert, aber haben Sie versuchen, mit 'ggplot' und konvertieren zu' 'plotly' ggplotly' mit? In 'ggplot' können Sie Text mit der Funktion 'annotieren' hinzufügen. –

Antwort

0
diese

Versuchen. Ändern Sie die x und y für Layout-Annotation basierend auf wo Sie Ihren Text möchten.

p <- plot_ly(data=data.mosann, x = ~Combined, y = ~Actual)%>% 
    layout(xaxis = ~Combined, yaxis = ~Actual, 
     annotations = list(text = "YOUR TEXT HERE", x = 200, y = 30,showarrow=FALSE), 
     shapes=list(type='line', x0= 0, x1= 235, y0=0, y1=235, line=list(color='red',width=3)), 
     title = 'Scatter Plot Measurements-Combined Improvements MinT', 
     xaxis = list(title = "Combined MinT", showgrid = TRUE), 
     yaxis = list(title = "Measurements", showgrid = TRUE)) 
+0

Es gibt einen seltsamen Fehler, "Fehler: $ Operator ist ungültig für atomare Vektoren". Ich habe überprüft, dass im Code kein $ -Zeichen steht. – Reiso

+0

Ändern Sie "xaxis" und "yaxis" im Layout in einige geeignete Zahlen. ex: 'xaxis = 30, yaxis = 200', oder versuchen' xaxis = x, yaxis = y' – SamAct

+0

Sein nehmen ~ Zeichen als Fehler, keine Sorge 'xaxis = x, yaxis = y' sollte funktionieren, auch Sie müssen kombiniere 'xaxis = list (title =" Kombiniertes MinT ", showgrid = TRUE), yaxis = liste (title =" Measurements ", showgrid = TRUE))' zusammen mit ihm. – SamAct