Create exploratory_analysis.R