R/isDate.R

Defines functions isDate

isDate = function(x){
  stringr::str_extract(na.omit(x),'[[:digit:]][[:digit:]]') %in% c("19","20") %>% all()
}
douve/UEMR documentation built on Aug. 28, 2023, 2:30 p.m.