Step 1
Install Package twitteR
Step 2
Load Package twitteR
Step 3
Using your Twitter Login ID and Password Login to https://dev.twitter.com/apps/
In case you forget the twitter.com username and password, click on Forgot Password to reset Password
Step 4
Create a new app for yourself by navigating to My Applications
Step 5
Your Apps are here
https://dev.twitter.com/apps
Click on New Application (button on top right)
Step 6
Fill the options here- leave the callback url blank
Name should be Unique
Description should be atleast 10 Charachters
Website can be a placeholder as of now (or your blog address)
Agree to Terms and Conditions
Type the Spam Check Number and Letters
Step 7
Note these details from your new APP
Consumer Key
Consumer Secret
On the Bottom -
Click on Create your OAuth Token
Finally your APP page should look like this (dont worry i will be deleting this app so you cant hack my twitter yet)
Step 8
Go to R
Type the following code after you changed the two consumer keys (IMPORTANT- You will need to change your Consumer Key and Consumer Secret to the one specific to YOUR app)
NOTE- WordPress makes some changes when you copy and paste code to your blog
(like adding &8221 to lines 2-4 below- Ignore this please)
THE final formatted code is at very end of the post
library(twitteR)
reqURL <- “https://api.twitter.com/oauth/request_token”
accessURL <- “http://api.twitter.com/oauth/access_token”
authURL <- “http://api.twitter.com/oauth/authorize”
consumerKey <- “2uQlGBBMMXdDffcK2IkAsg“
consumerSecret <- “xrGr71kTfdT3ypWFURGxyJOC4Oqf46Rwu4qxyxoEfM”
twitCred <- OAuthFactory$new(consumerKey=consumerKey,
consumerSecret=consumerSecret,
requestURL=reqURL,
accessURL=accessURL,
authURL=authURL)
Step 9
Do the Twitter Handshake by pasting this
command in R Console
twitCred$handshake()
You will see a message like this from R
To enable the connection, please direct your web browser to: http://api.twitter.com/oauth/authorize?oauth_token=pJqojAg2gxmqip3SprJAyOckdcD1nB3MvlbP2dWUDGQ When complete, record the PIN given to you and provide it here:
Step 10
Go to the link above given by R
You will get this message
Click on blue button
Authorize app
Step 11 Entering the Pin
Now you see a pin here
like this
-You cant copy and paste it. Write it down and then type in your R console
Step 12
Now register the credentials using
registerTwitterOAuth(twitCred)
you will see this
if done correctly
> registerTwitterOAuth(twitCred) [1] TRUE
Step 13
Search Twitter using commands like here. Note it returns only 499 tweets
> a=searchTwitter(“#rstats”, n=2000)
Warning message: In doRppAPICall(“search/tweets”, n, params = params, retryOnRateLimit = retryOnRateLimit, : 2000 tweets were requested but the API can only return 499
Step 14 Now you can start analyzing the data
Convert the data into a data frame tweets_df = twListToDF(a)
Install Packages tm (for textmining and wordcloud)
> install.packages(c(“tm”, “wordcloud”))
Load the Packages
library(tm)
library(wordcloud)
Basic Word Cloud can be created using code below
b=Corpus(VectorSource(tweets_df$text), readerControl = list(language = “eng”))
b<- tm_map(b, tolower) #Changes case to lower case
b<- tm_map(b, stripWhitespace) #Strips White Space
b <- tm_map(b, removePunctuation) #Removes Punctuation
inspect(b)
tdm <- TermDocumentMatrix(b)
m1 <- as.matrix(tdm)
v1<- sort(rowSums(m1),decreasing=TRUE)
d1<- data.frame(word = names(v1),freq=v1)
wordcloud(d1$word,d1$freq)
For more detailed analysis on what you can do with Twitter and R, read this http://cran.r-project.org/web/packages/twitteR/twitteR.pdf or this https://sites.google.com/site/miningtwitter/
Step 15 Keep your OAuth keys safely, and do your homework with out bothering your instructor too much.
If you try and copy the paste the code from a website, be sure to change the quotation marks “” manually in your R console
Also see on text mining http://decisionstats.com/2012/03/19/text-mining-barack-obama/
FINAL CODE
Created by Pretty R at inside-R.org