Я сейчас пытаюсь отправить твиты с R, но не могу обойти следующую ошибку:
Error in .self$twFromJSON(out) :
Error: Could not authenticate with OAuth.
Я следовал указаниям виньетки twitteR и другим вопросам стекового потока, касающимся этого вопроса (/5076029/roauth-v-windows-s-ispolzovaniem-r),, но, похоже, ни один из них не обошел эту ошибку. Вот код, который я использую:
library("twitteR")
library('ROAuth')
requestURL <- "https://api.twitter.com/oauth/request_token"
accessURL = "http://api.twitter.com/oauth/access_token"
authURL = "http://api.twitter.com/oauth/authorize"
consumerKey = "*****************************"
consumerSecret = "************************"
Cred <- OAuthFactory$new(consumerKey=consumerKey,
consumerSecret=consumerSecret,
requestURL=requestURL,
accessURL=accessURL,
authURL=authURL)
Cred$handshake(cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl"))
registerTwitterOAuth(Cred)
Через здесь работает. registerTwitterOAuth возвращает TRUE, так что вы можете подумать, что все работает. Но когда я пытаюсь отправить твит, я получаю сообщение об ошибке, указанное выше.
Я пытаюсь отправить твит, выполнив:
tweet("text to tweet")
В результате:
Error in .self$twFromJSON(out) :
Error: Could not authenticate with OAuth.
Не уверен, что происходит не так. Кажется, проверка OAuth работает, но я не могу отправлять твиты.