R/calculate_total_time.R

In meerapatelmd/setupRxNorm: RxNorm and RxClass Postgres Database Management

calculate_total_time  <-
  function (total_iterations)
  {
    time_unit_per_iteration <- "seconds"
    lubridate::duration(num = 3*total_iterations,
                        units = time_unit_per_iteration)
  }