how to change interactive scale control

I can interactively change the scale of the graph and change its position, special zones on the scales are responsible for this

library(plotly)
x <- 1:50
y <- cumsum(rnorm(50))
fig <- plot_ly(x = ~x, y = ~y, type = 'scatter', mode = 'lines')
fig <- layout(fig, plot_bgcolor='lightgrey')
fig

![Screenshot_2|690x487](upload://rb0QE9UmtwOfNE8VSltcMoHb29C.png)
I would like to know if I can remove the up / down, left / right controls, and in their place insert only stretch / narrow.
![Screenshot_3|690x486](upload://wk7H7TReOSijgiN9xXUKBNMBGlL.png)

I also [created a stackoverflow](https://stackoverflow.com/questions/76321009/plotly-how-to-change-interactive-scale-control) question