Create CharAnalysis.R