Как добавить отступ вокруг заголовка в сюжет?

Question

Я конвертирую свой график ggplot2 в график. Я хотел бы добавить заголовок вручную, так как я хочу оставить пробел для добавления субтитров впоследствии - что ggplotly не делает само по себе.

g <- retention_cohorts %>% 
  ggplot(aes(relative_week, round(percent,2), label=relative_week)) + 
  geom_line() +
  scale_y_continuous(labels = percent) +
  scale_x_continuous(breaks = seq(1,24,4),
                     labels = seq(1,6)
  ) +
  geom_text(nudge_y = .02) +
  # geom_text_repel() +
  labs(
    # title = "Purchasing Retention Analysis",
    subtitle = "Customers who order at least one item each week",
    y = "Ratio of Customers",
    x = "Relative Month"
  ) + theme_light()

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

ggplotly(g) %>%    
  layout(
    title = "My Title",
    pad = list(b = 90, l = 130, r = 50 ))

Answer 1

Заголовок должен быть создан, как показано ниже.

library(plotly)
p <- plot_ly(midwest, x = ~percollege, color = ~state, type = "box")%>%    
  layout(title = list(text = "My Title",pad = list(b = 90, l = 130, r = 50 )))
p

Где title - это список со значениями text и pad.Пожалуйста, дайте мне знать, если это решит вашу проблему!