調整ggplot2中繪圖的高度並繪製

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's panel border functionality：

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

ORIGINAL：您提供的代碼是不是過頭我的筆記本電腦：

但是，如果你需要，你可以提供帶有明確高度和寬度參數的ggplotly()：

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

該功能具有some other nice arguments用於控制圖的外觀。