powered by
time_trans()
hours <- seq(ISOdate(2000,3,20, tz = ""), by = "hour", length.out = 10) t <- time_trans() t$trans(hours) t$inv(t$trans(hours)) t$format(t$breaks(range(hours)))
Run the code above in your browser using DataLab