An embedded and charset-unspecified text was scrubbed... Name: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20131122/0815feda/attachment.pl>
[R-es] Descargar tweets con package twitteR
2 messages · Candido del Rincón, Javier Martínez-López
Hola Candido,
yo uso este código y me va bien. Pruebalo! Saludos, Javier
reqURL <- "https://api.twitter.com/oauth/request_token"
accessURL <- "http://api.twitter.com/oauth/access_token"
authURL <- "http://api.twitter.com/oauth/authorize"
consumerKey <- "xxx"
consumerSecret <- "xxx"
twitCred <- OAuthFactory$new(consumerKey=consumerKey,
consumerSecret=consumerSecret,
requestURL=reqURL,
accessURL=accessURL,
authURL=authURL)
twitCred$handshake()
registerTwitterOAuth(twitCred)
2013/11/22 Candido del Rincón <candini81 en hotmail.com>:
Hola a tod en s!
Estoy dando mis primeros pasos con R, y mi objetivo es conseguir descargar tweets de cuentas concretas de twitter. Encontre documentación sobre el package twitteR, y he intentado aplicarlo, pero siempre tengo problemas a la hora de conseguir la autentificación con OAuth.
Este es el código que estoy utilizando:
options( RCurlOptions = list(verbose = TRUE, proxy = "XXXXXXXXXXXXXXXXXX"))
setInternet2(use = TRUE)
require("ROAuth")
require("twitteR")
require("wordcloud")
require("tm")
require("bitops")
require("RCurl")
require("digest")
require("Rcpp")
require("RColorBrewer")
library(twitteR)
library(tm)
library(wordcloud)
library(RColorBrewer)
library(bitops)
library(ROAuth)
library(RCurl)
library(digest)
library(rjson)
library(Rcpp)
requestURL <- "https://api.twitter.com/oauth/request_token"
accessURL = "https://api.twitter.com/oauth/access_token"
authURL = "https://api.twitter.com/oauth/authorize"
consumerKey = "XXXXXXXXXXXXXXXXXXXXXXXXXX"
consumerSecret = "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"
twitCred <- OAuthFactory$new(consumerKey=consumerKey,
consumerSecret=consumerSecret,
requestURL=requestURL,
accessURL=accessURL,
authURL=authURL)
download.file(url="http://curl.haxx.se/ca/cacert.pem",
destfile="cacert.perm")
twitCred$handshake(cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl"))
Al correr el código, al principio sà que me hace la conexión para verificar la autorización, pero me acaba saliendo el siguiente error:Error in strsplit(response, "&") : non-character argument
y no soy capaz de saber que es.
AgradecerÃa si alguien sabe que es lo que me pasa, me ayudará a solucionarlo.
Muchas gracias de antemano!
un saludo, Candi
[[alternative HTML version deleted]]
_______________________________________________ R-help-es mailing list R-help-es en r-project.org https://stat.ethz.ch/mailman/listinfo/r-help-es