我想跟踪转发下面推文的路径,但twitteR包似乎还不支持。因此我尝试使用包RCurl和RJSONIO,但失败了。以下是我的所作所为。
Tweet id 333572281450258432,“数据科学简介,关于Coursera的免费在线课程已于5月1日开始......”
R包:twitteR v1.1.6,ROAuth v0.9.3,RCurl v1.95-4.1,RJSONIO v1.0-3
库(Twitter)上
库(ROAuth)
库(RCurl)
库(RJSONIO)
使用Twitter进行身份验证已成功。
> cred <- OAuthFactory$new(...)
> cred$handshake()
> registerTwitterOAuth(cred)
TRUE
以下代码有效,并返回了转发上述推文333572281450258432的用户列表。
> url <- "https://api.twitter.com/1/statuses/333572281450258432/retweeted_by.json"
> rt.list <- fromJSON(httpGET(url))
然后我尝试使用下面的代码获取转推ID,但失败了。
> url <- "https://api.twitter.com/1/statuses/retweets/333572281450258432.json"
> retweets.list <- fromJSON(httpGET(url))
error in evaluating the argument 'content' in selecting a method for function 'fromJSON': Error: Bad Request
在浏览器中尝试上述网址时,显示
{“errors”:[{“message”:“Bad Authentication data”,“code”:215}]}
以上使用的Twitter API v1。我也试过Twitter API v1.1,代码如下,失败的错误与上面相同。下面两个查询失败的原因可能是我没有使用Twitter API v1.1正确设置身份验证。
> url <- "https://api.twitter.com/1.1/statuses/retweets/333572281450258432.json"
> url <- "https://api.twitter.com/1.1/statuses/retweeters/ids.json?id=333572281450258432&count=100&stringify_ids=true"
任何人都有这方面的经验,可以提供帮助
感谢。 赵延昌。 RDataMining.com