fork download
  1. time_s <- "2017-05-30T09:20:00-08:00"
  2. sub("^(\\d{4}-\\d{2}-\\d{2})T(\\d{2}:\\d{2}:\\d{2}).*", "\\1 \\2", time_s)
Success #stdin #stdout 0.16s 175424KB
stdin
Standard input is empty
stdout
[1] "2017-05-30 09:20:00"