Update timer.R