我在一个文件中有一年的年度时间数据，间隔为30分钟，如
"01-01-2013 00:00" "01-01-2013 00:30" "01-01-2013 01:00" "01-01-2013 01:30" "01-01-2013 02:00" "01-01-2013 02:30".....
但是在整个数据中，其中一些包含
"08-28-2013 14:53", "08-28-2013 15:37"
我需要从整个记录中找到那些并替换（舍入）到30分钟的时间间隔，如
"08-28-2013 15:00", "08-28-2013 15:30"
帮助我..
答案 0 :(得分：5)
datetimes <- c("08-28-2013 14:53", "08-28-2013 15:37")
datetimes <- strptime(datetimes, "%m-%d-%Y %H:%M", tz="GMT")
datetimes$min <- round(datetimes$min / 30) * 30
#1] "2013-08-28 15:00:00 GMT" "2013-08-28 15:30:00 GMT"