Create PrinciplesOfAnalyticGraph.r