Create preprocess_data.R