subtract POSIXt class objects and return value in HH:MM:SS format.
hms_span(start, end)
old Sys.time()
new Sys.time()
subtracted time in hh:mm:ss format
source: https://stackoverflow.com/questions/32100133/print-the-time-a-script-has-been-running-in-r answer by nrussell