Returns TRUE if vector is a date.
Examples
#----------------------------------------------------------------------------
# is_date() examples
#----------------------------------------------------------------------------
library(bkdat)
d <- as.Date("2019-01-01")
is_date(d)
#> [1] TRUE