Как я могу добавить заголовок к графику рассеяния R?

Question

Я пытаюсь добавить подпись к основному plot_ly, чтобы включить больше информации о графике рассеяния, который у меня есть.

Я просматривал эту ветку: графически добавляя источник или подпись к диаграмме , но подпись здесь встроена в заголовок оси X.

Кажется, я не могу получить подпись под графиком и заголовком оси X.

Answer 1

Начиная с сообщения, на которое вы ссылаетесь, вам нужно установить margin в plot_ly layout, а затем изменить x и y в annotations

library(plotly)
plot_ly(x=~hp, y=~mpg, data=mtcars, type="scatter", mode="marker") %>% 
  layout(margin = list(b=160), ##bottom margin in pixels
         annotations = 
           list(x = 0.5, y = -0.75, #position of text adjust as needed 
                text = "Source: data I found somewhere.", 
                showarrow = F, xref='paper', yref='paper', 
                xanchor='right', yanchor='auto', xshift=0, yshift=0,
                font=list(size=15, color="red"))
  )