使用 ggplotly() 显示绘图时绘图字幕丢失

Question

我在下面创建了带有标题和副标题的 ggplot，但是当我使用 ggplotly() 显示它时，副标题丢失了。

library(ggplot2)
p <- ggplot(ToothGrowth, aes(x = factor(dose), y = len)) + 
  geom_boxplot()
library(plotly)
p <- p + labs(title = "Effect of Vitamin C on Tooth Growth",
              subtitle = "Plot of length by dose",
              caption = "Data source: ToothGrowth")
ggplotly(p)

Answer 1

library(ggplot2)
p <- ggplot(ToothGrowth, aes(x = factor(dose), y = len)) + 
  geom_boxplot()
library(plotly)
p <- p + labs(title = "Effect of Vitamin C on Tooth Growth",
              subtitle = "Plot of length by dose",
              caption = "Data source: ToothGrowth")
ggplotly(p)%>% 
  layout(title = list(text = paste0('Effect of Vitamin C on Tooth Growth"',
                                    '<br>',
                                    '<sup>',
                                    'Plot of length by dose','</sup>')))

如果它解决了您的问题，请告诉我这个方法

使用 ggplotly() 显示绘图时绘图字幕丢失

Plot subtitle is lost when plot is diplayed with ggplotly()

r

ggplot2

ggplotly