在R中从Twitter接收数据时遇到麻烦

Question

我想从推特上得到数据。

但这些都是错误。

请帮我弄到数据？

按码

install.packages("rtweet")
library(rtweet)
# plotting and pipes - tidyverse!
library(ggplot2)
library(dplyr)
# text mining library
library(tidytext)
# whatever name you assigned to your created app
appname <- "**********"
## api key (example below is not a real key)
key <- "**************"
## api secret (example below is not a real key)
secret <- "***********"
twitter_token <- create_token(
  app = appname,
  consumer_key = key,
  consumer_secret = secret)
rstats_tweets <- search_tweets(q = "#rstats",
                               n = 500)

check_twitter_oauth ()中的错误: OAuth身份验证错误： 这很可能意味着您错误地调用了setup_twitter_oauth ()‘ curl :：curl_fetch_memory中的错误(url，句柄=句柄)： 达到超时:连接超时超过10,000毫秒

Answer 1

文档声称：

API授权

• 当您第一次发出API请求时-例如，search_tweets()、stream_tweets()、get_followers()-a浏览器窗口将打开。
• 登录到您的Twitter帐户。
• 同意/授权rtweet申请。

就这样！

但是，这对我没有用。

我必须遵循rtweet教程如何获取和使用访问令牌

# install from CRAN
install.packages("rtweet")
# load rtweet
library(rtweet)

我还必须安装httpuv包。本教程中没有提到这一点，但是在R中会得到相应的错误消息。

Oauth_listener中的错误(authorize_url，is_interactive)： 捕获OAuth凭据所需的httpuv包。

install.packages("httpuv")

然后在apps.twiter.com上创建具有正确回调URL的Twitter应用程序：

要创建一个Twitter应用程序，导航到apps.twitter.com并通过提供您选择的名称、描述和网站来创建一个新的应用程序(例如下面提供的屏幕快照)。 在回调URL字段中很重要，请确保输入以下内容： 如果您同意，请检查是，然后单击“创建您的Twitter应用程序”。

## whatever name you assigned to your created app
appname <- "rtweet_token"

## api key (example below is not a real key)
key <- "XYznzPFOFZR2a39FwWKN1Jp41"

## api secret (example below is not a real key)
secret <- "CtkGEWmSevZqJuKl6HHrBxbCybxI1xGLqrD5ynPd9jG0SoHZbD"

## create token named "twitter_token"
twitter_token <- create_token(
  app = appname,
  consumer_key = key,
  consumer_secret = secret)

最后，在执行此代码后打开一个浏览器窗口(如下所示)：

http://localhost:1410/?oauth_token=asdfasdfasdfaf5naw&oauth_verifier=dffasdfsdfsdfsdfsdfsk9jIQxDG6

显示信息：

身份验证完成。请关闭此页并返回到R。

现在你该走了。

另请参阅：

• https://developer.twitter.com/en/docs/basics/authentication/overview/oauth