update timing.R