Tag: date as number after ifelse in R