On maximize the window screen, half of plotly plot not showing in the full screen.

I am using R plotly in window-7.

let the data frame is

df<-data.frame(x=c(1:10),y=runif(10,3,8))

df
x y
1 1 6.152838
2 2 5.415271
3 3 3.265967
4 4 4.886916
5 5 4.300635
6 6 4.637657
7 7 4.534143
8 8 5.783432
9 9 6.110982
10 10 3.892279
class(df)
[1] "data.frame"
ggplot()+ geom_line(data = df, aes(x = x, y = y))
ggplotly()

Problem: on clicking the maximise the plot screen, half of the plot gets cut.
please check the image attached
```r
# insert reprex here
![without maximise the screen](https://user-images.githubusercontent.com/34315322/46241425-6aae6880-c3d7-11e8-8822-64ecbfd260cc.jpg)
![on maximise the screen](https://user-images.githubusercontent.com/34315322/46241429-7568fd80-c3d7-11e8-86be-563a26ac44b7.jpg)

首先，在 Windows 7 上使用提供的数据框、ggplot2 折线图和 ggplotly() 重现报告的行为。比较窗口最大化前后的图形，然后验证在这两种状态下完整图形都保持可见；该 issue 提供了屏幕截图，但没有提供源文件或测试位置。