Create sentimentanalysis.R