Functions for timing R scripts
