R/time_to_seconds_from_midnight.R

time_to_seconds_from_midnight <- function(times) {

  seconds <- as.numeric(difftime(times, as.hms(0), units = "secs"))

  return(seconds)
}
BoC-PaymentsResearch/CPMI_stats documentation built on May 13, 2019, 1:14 p.m.