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()

plot_ly(x = ~date, y = ~y, color = ~y) と add_markers() を使用した再現可能な R の例から始め、color を省略したケースと比較します。x 軸のリセットで 1970 の範囲が使用される理由を調査し、ダブルクリックによるリセットで xaxis の範囲を手動で指定しなくても 2019 の日付範囲が保持されることを確認します。