Create AnalysisScript.R