frame in `ggplotly` not working when taking a `Date` object

Hi Carson,

The new animation feature is awesome. But I run into an issue when the frame arg takes a Date object, and I need to convert to numerics. Please see the little reproducible example below:

library(plotly)
df <- data.frame(
  Date = seq(as.Date("2017-01-01"), as.Date("2017-01-05"), by = 1),
  Hour = rep(1:24, 5),
  Value = rnorm(24 * 5)
)
p1 <- ggplot(aes(Hour, Value, frame = Date), data = df) +
  geom_line() # not working
ggplotly(p1)
p2 <- ggplot(aes(Hour, Value, frame = as.numeric(Date)), data = df) +
  geom_line() # working
ggplotly(p2)

Thanks a lot,
Earo

Chạy ví dụ R có thể tái lập từ issue và so sánh ggplotly(p1), trong đó frame sử dụng Date, với ggplotly(p2), trong đó sử dụng as.numeric(Date). Bắt đầu từ cách ggplotly xử lý aesthetic frame và theo dõi cách các giá trị Date được chuyển đổi. Được xem là hoàn tất khi frame có giá trị Date hoạt động mà không cần chuyển đổi số thủ công và trường hợp số hiện có vẫn tiếp tục hoạt động.