## Not run:
# googlefinance <- WebCorpus(GoogleFinanceSource("NASDAQ:MSFT"))
# googlenews <- WebCorpus(GoogleNewsSource("Microsoft"))
# nytimes <- WebCorpus(NYTimesSource("Microsoft", appid = nytimes_appid))
# reutersnews <- WebCorpus(ReutersNewsSource("businessNews"))
# yahoofinance <- WebCorpus(YahooFinanceSource("MSFT"))
# yahooinplay <- WebCorpus(YahooInplaySource())
# yahoonews <- WebCorpus(YahooNewsSource("Microsoft"))
# ## End(Not run)
Run the code above in your browser using DataLab