Create profile_data.R