My data :
dput(head(mydata)) structure(list(DATE = structure(c(-315619200, -312940800, -310435200, -307756800, -305164800, -302486400), tzone = "UTC&quo