调整ggplot2和plotly中绘图的高度

Question

我使用 ggplot2 创建了一个简单的折线图，并使用 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 的面板边框功能：

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

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

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

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

该函数还有一些其他很好的参数来控制绘图的外观。