How do I get ggplotly rangeslider to set a sensible initial range with a date axis?

Question

I am trying to create an interactive visualisation of an individual\'s salary growth across multiple employers. When I add a rangeslider to the ggplotly function, the initia