使用R的Windows上的ROauth

看到我一直看到人们在Windows上提到这些问题,如果在运行R脚本之前执行以下操作,它应该自动解决问题,而不需要在此帖子中执行任何其他操作：

library(RCurl) 
options(RCurlOptions = list(cainfo = system.file("CurlSSL","cacert.pem",package = "RCurl")))

这将全局设置选项,并将用于所有RCurl调用.

我将留下以下帖子的其余部分以供参考.

注意：这不是一个直接的解决方案,但对于评论或#rstats推文也太长了……

读取输出,问题似乎是cURL(因此包RCurl).我可以使用RCurl_1.6-10在使用R2.14.0的Windows 7 x64 Pro上发生的不同应用程序重新创建相同的错误：

library(RCurl)
u <- "https://raw.github.com/tonybreyal/Blog-Reference-Functions/master/R/bingSearchXScraper/bingSearchXScraper."
x <- getURL(u)
#Error in curlPerform(curl = curl,.opts = opts,.encoding = .encoding) : 
#  SSL certificate problem,verify that the CA cert is OK. Details:
#error:14090086:SSL routines:SSL3_GET_SERVER_CERTIFICATE:certificate verify failed

错误代码是相同的.在您的情况下,这意味着Twitter正在向您发送证书,告诉您它们是真正的Twitter网站.但你怎么知道他们说实话？在您的系统的某个位置,您需要有一个可以确认它的文件,从受信任的来源获取.

一个解决方案是获取该文件如下解决问题(注意,还有其他网站提供此类文件,我使用官方cURL网站)：

download.file(url="http://curl.haxx.se/ca/cacert.pem",destfile="cacert.pem")
x <- getURL(u,cainfo = "cacert.pem")

我没有看过ROAuth的内部(任何用S3 / S4 / Reference-classes编写的东西吓到我了)但在某些时候它需要设置cainfo参数来克服这个问题(在Windows上是 – 在上面的例子中,似乎在Ubuntu上运行正常).我不知道ROAuth是否允许用户以某种方式添加这些卷曲参数,但这将是解决它的方法.

希望有所帮助.

Tony Breyal

附：另一种方法是可行的,并避免从cURL下载证书,但不推荐你正在做的事情类型(严重的是,为了你使用twitter的目的,我建议不要这么大的时间)：

x <- getURL(u,ssl.verifypeer = FALSE)

更新2011：

这似乎适用于跨平台(嗯,Ubuntu和Windows无论如何),并且不需要您直接下载SSL证书,因为RCurl已经带有它们：

x <- getURL(u,cainfo = system.file("CurlSSL",package = "RCurl"))