Update date_functions.R