Create R_analysis.R