r - R ggplotly：图例未正确显示

Question

plotly我的包裹确实有问题。图例无法正确显示或未显示所有值，因为它被剪切了！

我想将图例放在绘图区域之外（在底部或右上角）。

我已经尝试改变位置ggplot：

legend.position="bottom"

完全没有结果……

然后我尝试了plotly网站上的代码：

p %>% layout(legend = list(x = 0.5, y = -100))

它不起作用，图例在底部，但它被剪掉了，在x轴标题后面......

这是来自mtcars数据集的示例代码：

a <- ggplot(mtcars, aes(x = interaction(cyl, carb, lex.order = T), y = mpg,fill = interaction(cyl, carb, lex.order = T))) + 
  geom_boxplot()

ggplotly(a)

正如我们所看到的，传说的标题也被剪掉了……

我将不胜感激任何帮助！

谢谢

Answer 1

您可以使用边距和绘图大小。你可以试试：

m = list(
  l = 100,
  r = 40,
  b = 100,
  t = 50,
  pad = 0
)
a <- ggplot(mtcars, aes(x = interaction(cyl, carb, lex.order = T), y = mpg,fill = interaction(cyl, carb, lex.order = T))) + 
  geom_boxplot()
a %>% layout(autosize = F, width = 800, height = 600, margin = m)