Format difftime in a convenient way

Format difftime in a convenient way

fmt(x)

Arguments

x

difftime

Value

formatted difftime

Author

inspired by G. Grothendieck, https://stackoverflow.com/questions/24702796/outputting-difftime-as-hhmmssmm-in-r

Examples

now = Sys.time()
after = Sys.time() + 1000
if (FALSE) fmt(after - now)
if (FALSE) fmt(now - after)