用R发送推文

Question

几个月前,我在一个演示文稿中看到了一个可爱的R推文演示.演示者使用的临时代码在这里:

http://www.r-bloggers.com/twitter-from-r%E2%80%A6-sure-why-not/

代码很简短:库("RCurl")选择< - curlOptions(header = FALSE,userpwd ="username:password",netrc = FALSE)

tweet <- function(status){
  method <- "http://twitter.com/statuses/update.xml?status="
  encoded_status <- URLencode(status)
  request <- paste(method,encoded_status,sep = "")
  postForm(request,.opts = opts)
}

使用此功能,您只需使用更新功能即可发送推文:

tweet("This tweet comes from R! #rstats")

我认为这可能是宣布长期工作完成时的有用方式.我试图在我的机器上运行它,我收到一些错误:

[1]"\n \n不支持基本身份验证\n \n"attr(,"Content-Type")charset"application/xml""utf-8"警告消息:在postForm中(请求,.opts = opts ):没有输入传递给表单

我想知道在这个Twitter端是否有一些变化,这使得这段代码产生了这个错误？我不太了解让R与网页交谈,所以任何指导都非常感谢!!

Ë

Answer 1

是的,基本身份验证方案已于2010年8月16日停用.您需要将其设置为使用OAuth.不幸的是,这并不像使用基本身份验证那么简单

有关更多信息,请参阅此Twitter维基页面,以及有关OA的 OAuth的此StackOverflow问题.

Answer 2

除了你展示的代码之外,你还可以在CRAN上看到一个完整的twitteR软件包.