Create CleanDataWithRealTime.R