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)

Comece reproduzindo o comportamento relatado com o data frame fornecido, o gráfico de linhas do ggplot2 e o ggplotly() no Windows 7. Compare o gráfico antes e depois de maximizar a janela e, em seguida, verifique se o gráfico completo permanece visível em ambos os estados; a issue fornece capturas de tela, mas não fornece um arquivo-fonte nem a localização dos testes.