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)

Comienza reproduciendo el comportamiento informado con el marco de datos proporcionado, el gráfico de líneas de ggplot2 y ggplotly() en Windows 7. Compara el gráfico antes y después de maximizar la ventana y, a continuación, verifica que el gráfico completo siga visible en ambos estados; el issue proporciona capturas de pantalla, pero no un archivo fuente ni una ubicación para las pruebas.