Create data_preprocess.R