Question

我尝试使用此代码从我的R控制台发送推文

    library("RCurl")
opts <- 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")

但是得到这个错误：raw（0） Warnmeldung：在postForm中（request，.opts = optss）：没有输入传递给表单。

有人可以帮我吗？在http://blog.revolutionanalytics.com/2009/06/tweeting-from-r.html

上找到了代码

非常感谢

Answer 1

Twitter在2010年禁用了基本身份验证方案。这不再适用了。您必须使用OAuth2-Authentification。

最简单的方法是在CRAN上使用twitteR-Package。

第一步：认证：

consumer_key <- "yourcredentials"
consumer_secret <- "yourcredentials"
access_token <- "yourcredentials"
access_secret <- "yourcredentials"
setup_twitter_oauth(consumer_key, consumer_secret, access_token, access_secret)

您必须在Twitter上设置API-APP才能获得密钥：https://apps.twitter.com/

在此步骤之后，与您的问题相同：

tweet("Hello World")

每日限制为2400条推文。

从R控制台发出推文

1 个答案: