Create Fractionation_analysis.R