R code used to scramble personally identifiable dates like Date of Birth.