Create text_analysis.R

Usage:

text_analysis(name, file, wiki_name)

name: TV show name, will be the search term in google/yahoo news

file: location of a csv with tweets

wiki_name: name of the wikipedia article for the tv show

outputs 
  1) the average tweet polarity (from -1 to 1)
  2) average news polarity
  3) number of wikipedia visits in the last 30 days
  4) series of tweet, google and yahoo polarities