0Auth handshake failed in R - r

I am attempting to set up a tweet sentiment analysis tool in R, however I keep getting errors in relation to 0Auth not completing it's handshake.
it's using a tutorial that I found online, however I'm new to R and coding in general so I'm stumped.
Any light that can be shed on this would be much appreciated:
install.packages("twitteR")
install.packages("plyr")
install.packages("stringr")
install.packages("ggplot2")
install.packages("streamR")
library(twitteR)
library(ROAuth)
library(plyr)
library(stringr)
library(ggplot2)
## Windows users need to get this file
download.file(url="http://curl.haxx.se/ca/cacert.pem", destfile="cacert.pem")
requestURL <- "https://api.twitter.com/oauth/request_token"
accessURL = "https://api.twitter.com/oauth/access_token"
authURL = "https://api.twitter.com/oauth/authorize"
consumerKey = "conkey code"
consumerSecret = "consec code"
Cred <- OAuthFactory$new(consumerKey=consumerKey,
consumerSecret=consumerSecret,
requestURL=requestURL,
accessURL=accessURL,
authURL=authURL)
Cred$handshake(cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl") )
1340490
load("twitter authentication.Rdata")
registerTwitterOAuth(Cred)

Have you tried looking at the creators github page:(https://github.com/geoffjentry/twitteR/blob/master/README.md) It's an easier way to do it. You will also need to install Rtools if you are going to do it this way. Here is a youtube link that shows you how to install Rtools(https://www.youtube.com/watch?v=enPPMHr5SrM) it is in Chinese but you can still follow what this guy is doing. I hope this helps.

Related

RTweet OAuth Error in Configuration

I know literally zero about the R programming language and have come to an impasse where I am truly and utterly stuck.
I've borrowed lots of other peoples code and have been busy debugging placing in additional libraries that are not contained within the help text of the packages to get to a point I feel is tantalisingly close.
That said I simply cannot get R to correctly authorise a twitter search or OAuth Connection.
I run my code, it throws up the following error screen.
Alongside that in the R-Compiler the error message of
twitCred$handshake() To enable the connection, please direct your web
browser to:
http://api.twitter.com/oauth/authorize?oauth_token=r4VjQQAAAAAA4-K7AAABYlMXEws
When complete, record the PIN given to you and provide it here:
registerTwitterOAuth(twitCred) Error: Forbidden
I read that there can be issues with the call back if the weblinks within the code do not read https:// and are left with http:// so that has been amended accordingly to no avail.
My twitter settings are as follows
I followed the advice laid down in this thread but it didn't seem to help or I did something I wasn't supposed to.... StackOverflow Support Article
So here is my code please shout if you can see the obvious to you not to me error or can offer some advice.
## install devtools package if it's not already
if (!requireNamespace("devtools", quietly = TRUE)) {
install.packages("devtools")
}
## install dev version of rtweet from github
devtools::install_github("mkearney/rtweet")
## load rtweet package
library(rtweet)
install.packages("rtweet")
install.packages("RCurl")
install.packages("tm")
install.packages("wordcloud")
install.packages("httpuv")
install.packages(c('ROAuth','RCurl'))
install.packages("rjson")
install.packages("bit64")
install.packages("httr")
require(twitteR)
require(RCurl)
require(tm)
require(wordcloud)
require(httpuv)
require(rtweet)
require(ROAuth)
require(RCurl)
require(rjson)
require(bit64)
require(httr)
## CURL LOGIC ##
reqURL <- "https://api.twitter.com/oauth/request_token"
accessURL <- "https://api.twitter.com/oauth/access_token"
authURL <- "https://api.twitter.com/oauth/authorize"
api_key <- "AAAAAAA"
consumer_key <- "AAAAAAA"
consumerKey <- "AAAAAAA"
consumerSecret <- "AAAAAAA"
twitCred <- OAuthFactory$new(consumerKey=consumerKey,
access_token <- "AAAAAAA"
access_token_secret <- "AAAAAAAAAA"
consumerSecret=consumerSecret,
requestURL=reqURL,
accessURL=accessURL,
authURL=authURL)
twitCred$handshake()
registerTwitterOAuth(twitCred)
##################
The duplications of API keys are meant to be there as I have tried so many connection advice threads and am lost now on the hows whys and wherefores...
You can use the twitteR package for data mining Twitter.
Please find the below code for your reference.
install.packages('twitteR')
install.packages('ROAuth')
install.packages("RCurl")
library(twitteR)
require("ROAuth")
require("RCurl")
download.file(url="http://curl.haxx.se/ca/cacert.pem",destfile="cacert.pem")
t_consumer_key<- 'YOUR CONSUMER KEY'
t_consumer_secret<- 'YOUR CONSUMER SECRET KEY'
t_access_token<- 'YOUR ACCESS TOKEN'
t_access_secret <- 'YOUR ACCESS SECRET'
setup_twitter_oauth(t_consumer_key,t_consumer_secret,t_access_token,t_access_secret)
list <- searchTwitter("iphone")
If you click on the link in below image you will get all the API keys

Twitter Authentication in R

Trying to get Twitter authentication to work in R (for analyzing tweets), but RStudio does not respond to the PIN + get error messages.
I use Mac OS X 10.6.8 and RStudio Version 0.98.1091
Here's the code I'm using (incl. placeholders):
install.packages("twitteR")
library(twitteR)
download.file(url="http://curl.haxx.se/ca/cacert.pem", destfile="my_folder/my_subfolder/http://curl.haxx.se/ca/cacert.pem")
require(twitteR)
download.file(url="http://curl.haxx.se/ca/cacert.pem", destfile="cacert.pem")
requestURL <- "https://api.twitter.com/oauth/request_token"
accessURL = "https://api.twitter.com/oauth/access_token"
authURL = "https://api.twitter.com/oauth/authorize"
consumerKey = "xxxx"
consumerSecret = "yyyyy"
Cred <- OAuthFactory$new(consumerKey=consumerKey,
consumerSecret=consumerSecret,
requestURL=requestURL,
accessURL=accessURL,
authURL=authURL)
Cred$handshake(cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl") )
I get this:
"To enable the connection, please direct your web browser to:
https://api.twitter.com/oauth/authorize?oauth_token=bWNevwJNJUPEzKLJwHQsK2uRLN4At5LO
When complete, record the PIN given to you and provide it here: registerTwitterOAuth(Cred)
Error: Authorization Required"
When I enter the PIN in the console I only get this:
>1234567
[1] 1234567
I then try to run
registerTwitterOAuth(Cred), but get this in the console:
Error in registerTwitterOAuth(Cred) :
oauth has not completed its handshake
Not sure what I am doing wrong or how I can obtain authentication/authorization.
Very thankful for any help on this.
try this
library(httk)
library(httpuv)
#browser based authentication
consumer_key <- "xxxxxxxxxxxxxxxxxxxx"
consumer_secret<- "xxxxxxxxxxxxxxxxxxxxxxxxx"
setup_twitter_oauth(consumer_key, consumer_secret, access_token=NULL,access_secret=NULL)
I used the following for Twitter authentication in Windows OS, and it works fine. Maybe it gives some direction!
library(RCurl)
library(twitteR)
options(RCurlOptions = list(cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl")))
reqURL <- "https://api.twitter.com/oauth/request_token"
accessURL <- "https://api.twitter.com/oauth/access_token"
authURL <- "https://api.twitter.com/oauth/authorize"
consumerKey <- "insert your consumer key here"
consumerSecret <- "insert your consumer secret here"
twitCred <-OAuthFactory$new(consumerKey=consumerKey,consumerSecret=consumerSecret,requestURL=reqURL,accessURL=accessURL,authURL=authURL)
twitCred$handshake(cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl"))
registerTwitterOAuth(twitCred)
I finally figured it out! The console won't let me copy the url after running the code, so I have to type the url with the unique token by hand. I wasn't aware of this. It's a little cumbersome, but at least it works. I'm running into other problems, which I read elsewhere on StackOverflow, might be a problem with Mac's operative system, so this might be linked to it as well. RStudio doesn't seem to jive to well with Mac.
Thanks for all the help!
Make sure that in the Application Settings of Twitter Developers you entered:
Callback URL: http://127.0.0.1:1410
Sign in with Twitter: Yes

Rstudio to Twitter handshake giving Error: Unauthorized via twitterR

I am trying to authenticate Rstudio to Twittter using twitteR.
I only error after the handshake.
My code is:
#install(rcurl, ROAuth, twitteR)
#load(rcurl, ROAuth, twitteR)
reqURL <- "https://api.twitter.com/oauth/request_token"
accessURL <- "https://api.twitter.com/oauth/access_token"
authURL <- "https://api.twitter.com/oauth/authorize"
consumerKey <- "key"
consumerSecret <- "secret key"
twitCred <- OAuthFactory$new(consumerKey=consumerKey,
consumerSecret=consumerSecret,
requestURL=reqURL,
accessURL=accessURL,
authURL=authURL)
options(RCurlOptions = list(cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl")))
twitCred$handshake()
I get the handshake and it send me to the auth page for Twitter. I authorize and get a pin.
I enter the pin in this code:
registerTwitterOAuth(pin number here)
Then I am returned with a "Error: Unauthorized".
I added a new Twitter application account and got a different set of customer keys, but still got the same.
You can follow this step:
reqURL <- "https://api.twitter.com/oauth/request_token"
accessURL <- "https://api.twitter.com/oauth/access_token"
authURL <- "https://api.twitter.com/oauth/authorize"
consumerKey <- "Mjn6tdsadsadkasdklad2SV1l"
consumerSecret <- "58Z7Eldsdfaslkf;asldsaoeorjkfksaVCQtvri"
twitCred <- OAuthFactory$new(consumerKey=consumerKey,
consumerSecret=consumerSecret,
requestURL=reqURL,
accessURL=accessURL,
authURL=authURL)
twitCred$handshake()
After you run this code you will see in R console message like this :
To enable the connection, please direct your web browser to:
https://api.twitter.com/oauth/authorize?oauth_token=scmVODruosvz6Tdsdadadasdsa
When complete, record the PIN given to you and provide it here:
Just paste the link to your browser then authorize app, last one you will get the PIN code, just copy and paste the PIN code to your R console.
registerTwitterOAuth(twitCred)
R console will show TRUE if you success.
user <- getUser("xxx")
userTimeline(user, n=20, maxID=NULL, sinceID=NULL, includeRts=FALSE)
If still any problem just try to show your package version and update to the last version
sessionInfo()
update.packages()
The last version for twitteR is 1.1.7 => http://cran.r-project.org/web/packages/twitteR/index.html
Following the below steps made my code work after trying out the suggestions from every possible resource over the net!!!! I am using windows 7, 64 bit and RStudio for the code below
Make sure you've got all appropriate packages installed - ROAuth, twitteR, RCurl; Usually the dependencies indicated on the CRAN page will point you to the missing packages if any
Set SSL certs globally as shown in the code; I am not an expert as to why this is required but it > helped me get my code through Use download.file command to download the cacert.pem file Make sure your twitter app has full read write access and not just the read only access which is the default
Final Code to link with Twitter
Get appropriate libraries
library(twitteR)
library(ROAuth)
library(RCurl)
Set SSL certs globally
options(RCurlOptions = list(cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl")))
download.file(url="http://curl.haxx.se/ca/cacert.pem", destfile="cacert.pem")
Make sure the url's are https and not http in case you have copied the code from somewhere
reqURL <- "https://api.twitter.com/oauth/request_token"
accessURL <- "https://api.twitter.com/oauth/access_token"
authURL <- "https://api.twitter.com/oauth/authorize"
consumerKey <- "====="
consumerSecret <- "====="
twitCred <- OAuthFactory$new(consumerKey=consumerKey,
consumerSecret=consumerSecret,
requestURL=reqURL,
accessURL=accessURL,
authURL=authURL)
#twitCred <- getTwitterOAuth(consumer_key= consumerKey, consumer_secret=consumerSecret)
twitCred$handshake()
At this point you need to paste the URL into the browser which will open a twitter page with your > application - you need to get the PIN from there and paste it in the R Console
registerTwitterOAuth(twitCred)
TESTTHE CODE: Now you can test the code
testSearch = searchTwitter("#food", n = 10, cainfo="cacert.pem")
Moditweets <- searchTwitter("#Narendra Modi", n = 100)
Following worked for me, windows 8, note that authentication must be done in cmd, it cant happen via Rstudio IDE, you want to authenticate R as language
#Open admin shell: In the Start Search box, type cmd, and then press CTRL+SHIFT+ENTER.
#Goto C:/...R../bin/x64, run ./r.exe
install.packages("twitteR") #Takes some time for mirrors to pop-up
library(twitteR)
library(ROAuth)
library(RCurl)
download.file(url="http://curl.haxx.se/ca/cacert.pem",destfile="cacert.pem")
requestURL <- ...
accessURL <- ...
authURL <- ...
consumerKey <- ...
consumerSecret <- ...
twitCred <- OAuthFactory$new(consumerKey=consumerKey, consumerSecret=consumerSecret,
requestURL=requestURL, accessURL=accessURL, authURL=authURL)
twitCred$handshake(cainfo="cacert.pem")
registerTwitterOAuth(twitCred)
save(list="twitCred", file="twitteR_credentials")
## Now to get some tweets, place the files cacert.perm and
twitteR_credentials from bin folder to the the current working directory of Rstudio
library (twitteR)
load("twitteR_credentials")
registerTwitterOAuth(twitCred)
searchTwitter('#Obama', cainfo="cacert.pem", n=5, locale = 'en')

Unauthorized error with ROAuth

I am using the streamR package to pull tweets from the Twitter Streaming API. This was working fine till recently. Now - I am getting the error whenever I do a handshake.
> library(ROAuth)
> reqURL <- "https://api.twitter.com/oauth/request_token"
> accessURL <- "https://api.twitter.com/oauth/access_token"
> authURL <- "https://api.twitter.com/oauth/authorize"
> consumerKey <- "<myconsumerkey>"
> consumerSecret <- "myconsumersecret>"
> my_oauth <- OAuthFactory$new(consumerKey=consumerKey,consumerSecret=consumerSecret,requestURL=reqURL,accessURL=accessURL,authURL=authURL)
> my_oauth$handshake(cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl"))
Error: Unauthorized
I have tried recreating a new application on dev.twitter.com and I still get the same error. I have tried changing the callback URL and the access levels - but no use. I have also tried using the master branch of ROAuth from github. Any idea where I am going wrong? I am using R 3.0.1
I had the same problem. The following sequence of commands solved the problem:
consumerKey <- ...
consumerSecret <- ...
twitCred <- getTwitterOAuth(consumer_key= consumerKey, consumer_secret=consumerSecret)
searchTwitter()
Notice I didn't use registerTwitterOAuth(twitCred). I think if you wanna save and later load twitCred you have to use registerTwitterOAuth(twitCred) after loading.
I hope this helps.
P.S. Since I am using a Mac, I didn't use the cacert.pem file. I think it is just required for Windows.

ROAuth handshake

I have been trying to authenticate through ROAuth using the following script:
library("ROAuth")
library("RCurl")
requestURL <- "https://api.twitter.com/oauth/request_token"
accessURL = "https://api.twitter.com/oauth/access_token"
authURL = "https://api.twitter.com/oauth/authorize"
cKey<- "Key"
cSecret<- "Secret"
Cred <- OAuthFactory$new(consumerKey=cKey,
consumerSecret=cSecret,
requestURL=requestURL,
accessURL=accessURL,
authURL=authURL)
Cred$handshake(cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl"))
Every time I enter in this code, I get the error:
Error in Cred$handshake(cainfo = system.file("CurlSSL", "cacert.pem", : Invalid response from site, please check your consumerKey and consumerSecret and try again.
I am not sure what I am doing wrong. I have made sure every necessary package is up to date by re-installing ROauth and RCurl and checking their version information (ROAuth 0.9.1 and RCurl_1.91-1.1(?) ). After installation, I restarted R (as a possible solution suggested by another post). I copy-pasted and double-checked the consumer key and consumer secret, and I am sure they are correct. Does anyone have any other ideas?
Thank you.
Apparently the handshake method in ROauth was broken but was since fixed. The error message you posted (the same one I'm getting right now) is the same as the one referenced in the following link:
http://lists.hexdump.org/pipermail/twitter-users-hexdump.org/2012-February/000059.html
I'm guessing there's still an issue so will see if I can find anything else out...
I can't help with RCurl/ROAuth — but you could try the package ‛httr‛ https://github.com/hadley/httr/ . It comes with a demo how to access Twitter.

Resources