date_choose_first_good function

Choose the first non-missing date from a data frame of dates