I have two datasets as follows:
DT1 <- as.data.frame(c("Alabama", "Autauga", "Baldwin", "Barbour", "Bibb"