Update data_import.R