R: Convertire ore: minuti: secondi

Question

ho un vettore "Time.Training" nel formato ore: minuti: secondi (ad esempio

Time.Training<- c("1:00:00", "0:45:00", "0:30:00", "1:30:00") 

vorrei convertire questo in minuti nel formato:

Time.Training.Minutes<-c(60, 45, 30, 90) 

mi chiedo se qualcuno ha un metodo semplice di fare questo in R.

Molte grazie.

Matt

Answer 1

Ecco alcune alternative:

1) CH pacchetto ron ha una classe "times" in cui 1 unità è un giorno e ci sono 60 * 24 minuti in un giorno così:

library(chron) 
60 * 24 * as.numeric(times(Time.Training)) 

dono:

[1] 60 45 30 90 

1a) altro approccio utilizza chron è il seguente (dare la stessa risposta):

library(chron) 

ch <- times(Time.training) 
60 * hours(ch) + minutes(ch) 

2) Ecco un approccio utilizzando read.table e moltiplicazione matrice/vettoriale. Nessun pacchetto sono necessari:

c(as.matrix(read.table(text = Time.Training, sep = ":")) %*% c(60, 1, 1/60)) 

(Usando "POSIXlt" è probabilmente l'approccio più straight-forward, senza pacchetti, ma un'altra risposta prevede già che.)

Answer 2

Prova questo. Abbiamo praticamente conversione in POSIXlt prima classe incollando una data reale al vettore utilizzando la funzione Sys.Date() (perché non c'è classe ora nella base di R) e quindi utilizzando hour e min argomenti per ottenere la potenza

Res <- as.POSIXlt(paste(Sys.Date(), Time.Training)) 
Res$hour*60 + Res$min 
## [1] 60 45 30 90 

Answer 3

utilizzando lubridate:

Time.Training<- c("1:00:00", "0:45:00", "0:30:00", "1:30:00") 

library(lubridate) 
res <- hms(Time.Training)  # format to 'hours:minutes:seconds' 
hour(res)*60 + minute(res)  # convert hours to minutes, and add minutes 
## [1] 60 45 30 90 

Answer 4

Uso as.difftime:

> Time.Training<- c("1:00:00", "0:45:00", "0:30:00", "1:30:00") 
> strtoi(as.difftime(Time.Training, format = "%H:%M:%S", units = "mins")) 
[1] 60 45 30 90