Create data_1stWash.R