Time series plot x range starts from 1970

When I'm trying to plot a time series coloured by the value of variable, the date range starts from 1970. It defaults to a sensible date if I exclude the color argument. I can certainly manually specify the xaxis range, but when I double click the plot to reset the scale it goes back to the 1970 range again, which is quite annoying.

library(lubridate)
library(plotly)

data <- data.frame(date = seq(from = ymd_hms("20190101 000000"), 
                              to = ymd_hms("20190301 000000"), 
                              by = "1 hour"),
                   y = round(runif(1417, 0, 10)))

data %>%
  plot_ly(x = ~date, y = ~y, color = ~y) %>%
  add_markers()

Bắt đầu với ví dụ R có thể tái hiện sử dụng plot_ly(x = ~date, y = ~y, color = ~y) và add_markers(), so sánh với trường hợp bỏ qua color. Điều tra lý do việc đặt lại trục x sử dụng một khoảng của năm 1970, và xác minh rằng việc đặt lại bằng cách nhấp đúp vẫn giữ khoảng ngày của năm 2019 mà không cần chỉ định thủ công khoảng của xaxis.