从时间上分几分钟（24小时格式）？

Question

在想，如果一些能帮助

time <-c("16:09", "05:26", "08:47", "03:04", "03:07", "02:01") 
min <-c(60, 5, 124, 35, 400, 2) 

我想提取与向量的“时间”的第n个元素中减去的载体“分钟”第n个元素修订的时间。因此，例如，矢量“修订时间”的第一个元素应该是15.09后减去60分钟。

在此先感谢

一个

Answer 1

您需要首先进行格式化你的时间矢量做到这一点。然后你就可以秒。减去像这样：

time2<-strptime(time, "%H:%M") 
time2[1]-(60*60) 

[1] "2015-10-19 15:09:00 CEST" 

Answer 2

可以在lubridate

library(lubridate) 

hm(time) - new_period(minute = min) 

Answer 3

这应该给你，你找什么，但你可能要考虑一个专用的包：

time <- c("16:09", "05:26", "08:47", "03:04", "03:07", "02:01") 
min <- c(60, 5, 124, 35, 400, 2) 

format(strptime(time, "%M:%S") - min, "%M:%S") 
# [1] "15:09" "05:21" "06:43" "02:29" "56:27" "01:59"