Вывод минут из времени (в формате 24 часа)?

Question

Было интересно, если кто-то может помочь

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

Я хочу, чтобы извлечь пересмотренное время с п-й элемент вектора «мин» вычтена из п-й элемент вектора «времени». Так, например, 1-й элемент векторного «пересмотренного времени» должен быть 15.09 после вычитания 60 минут.

Заранее спасибо

A

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"