标准形式显示时间，抽出里边的年月或日，原来时间加10分钟

1.以标准形式显示时间：

修改前：

station$online_date %>%

  mdy()

修改后：

再试一下另一种：修改前：

trip_starttime_shape <- 

  trip$starttime %>%

  mdy_hm()

修改后：

2.抽出年月或日：（注意，这项操作必须建立在上一步之上，即必须先变成上述标准形式）

小时：

starttime_h <- hour(trip_starttime_shape)

星期：

stoptime_w <- weekdays(trip_stoptime_shape)

3.原来时间加10分钟：

t <- as.POSIXlt(trip_starttime_shape)+600

注意：处理前的数据需要是标准格式，然后处理过程中需要as.POSIX1t()函数

• task4.zip