一般使用R从数据库导出来的时间数据一般都不是我们能看的懂的（具体是什么格式的我也忘记了），需要做如下转化
1 as.Date(time,origin = '1970-01-01')
最近从网上爬下来的时间数据是UTC格式的，需要作如下转化
1 my_date <- as.POSIXct(1.49550e+12/1000,origin = '1970-01-01')
2 as.Date(my_date,format = '%Y-%M-%D')
> as.Date(my_date,format = '%Y-%M-%D')
[1] "2017-05-23"