Create AvrgSentiments.R