[R-es] Descargar tweets con package twitteR

[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
>