Twitter和R（Curl:Curl\u fetch\u内存错误）

这是我的密码：

install.packages('twitteR',dependencies=T)
install.packages('httpRequest')
install.packages('purrr')
install.packages('httk')
install.packages('httpuv')
install.packages("base64enc") 

library(twitteR)
library(plyr)
library(purrr)
library(httk) 
library(httpuv) 

my_key<- "*****"
my_secret<- "*****"
my_access_token<-NULL
my_access_secret<-NULL
setup_twitter_oauth(my_key,my_secret,my_access_token,my_access_secret
                    )

tweets=searchTwitter('#abortion',n=1500)
length(tweets)
tweets.text=laply(tweets,function(t)t$getText())
pos=scan('positive-words.text',What='character',comment.char=';')

install.packages（'twitteR'，dependencies=T）
install.packages（'httpRequest'））
install.packages（'purrr'）
install.packages（'httk'））
install.packages（'httpuv'））
安装程序包（“base64enc”）
图书馆（推特）
图书馆（plyr）
图书馆（purrr）
图书馆（httk）
图书馆（httpuv）
我的钥匙这里是一个最小的工作示例。我相信你需要提供所有四把钥匙/秘密

library(twitteR)
library(ROAuth)

api_key <- "***"
api_secret <- "***"
access_token <- "***"
access_token_secret <- "***"
setup_twitter_oauth(api_key,api_secret,access_token,access_token_secret)

tweets <- searchTwitter('#abortion', n = 10)
df <- twListToDF(tweets)

library（twitteR）
图书馆（ROAuth）
这里是一个简单的工作示例。我相信你需要提供所有四把钥匙/秘密

library(twitteR)
library(ROAuth)

api_key <- "***"
api_secret <- "***"
access_token <- "***"
access_token_secret <- "***"
setup_twitter_oauth(api_key,api_secret,access_token,access_token_secret)

tweets <- searchTwitter('#abortion', n = 10)
df <- twListToDF(tweets)

library（twitteR）
图书馆（ROAuth）
ApIYKEY HEY AdE，一对夫妇的评论：1修改你的证书，2提供最小的例子（所有的包是什么？），3考虑使用而不是<代码>推特>代码>后面的一个，4，然后跟随H.@ Addie，有几个注释：* 1修改你的证书，第2个提供最小的例子。（3的包是什么？），推特考虑使用，而不是<代码> Twitter <代码>，后面的是4，接着是。我得到了一个不同的错误：Cuffer-Twitter TyrOutAuthor（）中的错误：OAuthIdvalue:这很可能意味着你错误地调用了StuuPuthTwitter的OutAuthor（）'听起来您提供的密钥/机密不正确。当我提供实际信息时，上面的代码会起作用。我收到一个不同的错误：check_twitter_oauth（）：oauth身份验证错误：这很可能意味着您错误地调用了setup_twitter_oauth（）“听起来你提供的钥匙/秘密不正确。当我提供实际信息时，上面的代码有效。