Мы можем использовать ceiling_date
из lubridate
после преобразования его в datetime
library(lubridate)
ceiling_date(mdy_hms("March 12th 2019, 15: 08: 27.174"), unit = "minutes")
#[1] "2019-03-12 15:09:00 UTC"
Или, если вы просто хотите round
, использовать round_date
round_date(mdy_hms("March 12th 2019, 15: 08: 27.174"), unit = "minutes")
#[1] "2019-03-12 15:08:00 UTC"
, которыйтакже может быть сделано с базой R
round(as.POSIXct("March 12th 2019, 15: 08: 27.174",
format = "%B %dth %Y, %H:%M:%S"), "mins")
#[1] "2019-03-12 15:08:00 +08"