proc.time()
startTime <- proc.time() # Some Logic str_c("--- Elapsed time: ", (proc.time()-startTime)[3] %>% round(3), " seconds \ ") %>% cat()
startTime <- proc.time() # Some Logic str_c("--- Elapsed time: ", (proc.time()-startTime)[3] %>% round(3), " seconds \ ") %>% cat()