调整 ggplot2 和 plotly 中的绘图高度

Question

我使用 ggplot2 在 plotly 中创建了一个简单的折线图，并使用 box() 函数将该图放在一个盒子中。然而，情节超出了屏幕，我希望调整情节的大小。请帮助我。

library(plotly)

datn <- read.table(header=TRUE, text='
supp dose length
OJ  0.5  13.23
OJ  1.0  22.70
OJ  2.0  26.06
VC  0.5   7.98
VC  1.0  16.77
VC  2.0  26.14
')

p <- ggplot(data=datn, aes(x=dose, y=length, group=supp, colour=supp)) +
geom_line() +
geom_point()

p <- ggplotly(p)

Answer 1

编辑：抱歉，我错过了您使用 box() 添加绘图边框的评论（它不在您的示例代码中）。我建议改用ggplot2's panel border functionality:

p = p +
  theme(panel.border = element_rect(colour = "black", fill = NA, size = 3))

原文：您提供的代码在我的笔记本电脑上没有超调：

但如果需要，您可以为ggplotly() 提供明确的高度和宽度参数：

ggplotly(p, width = 500, height = 200)

该函数有some other nice arguments 用于控制绘图的外观。