How to force plotly select to brush along the x-axis only

I am trying to combine plotly interactivity with shiny:

R Shiny performance: generate plotly by function or download full html file?

So I am wondering the following: