Extract a year from a descriptive date string. The first sequence of 4 digits is matched; if none, a default value is returned.