Update dataCleaning.R