我正在尝试学习使用RSelenium。我坚持尝试使用rsDriver启动服务器。我只是试图运行下面的代码，并收到以下错误：
rD <- rsDriver()
checking Selenium Server versions:
BEGIN: PREDOWNLOAD
Error in open.connection(con, "rb") :
Peer certificate cannot be authenticated with given CA certificates
我搜索了堆栈溢出的内容，发现我们可以使用下面的方法为rsDriver提供选项，但仍然出现错误：
my_extra <- list("--ignore-ssl-errors=true", "--ssl-protocol=tlsv1", "--web-security=no")
rs <- rsDriver(extraCapabilities = my_extra)
checking Selenium Server versions:
BEGIN: PREDOWNLOAD
Error in open.connection(con, "rb") :
Peer certificate cannot be authenticated with given CA certificates
还有什么我想念的吗？
对于httr :: GET函数，我可以使用以下方法绕过SSL证书：
set_config(config(ssl_verifypeer=0L)).
但是此方法不适用于RSelenium :: rsDriver。
这是我的系统规格：
我的操作系统：Microsoft Windows 10
R version 3.4.1 (2017-06-30)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows >= 8 x64 (build 9200)
Matrix products: default
locale:
[1] LC_COLLATE=English_United States.1252
[2] LC_CTYPE=English_United States.1252
[3] LC_MONETARY=English_United States.1252
[4] LC_NUMERIC=C
[5] LC_TIME=English_United States.1252
attached base packages:
[1] stats graphics grDevices utils datasets methods base
other attached packages:
[1] RCurl_1.95-4.8 bitops_1.0-6 httr_1.2.1 wdman_0.2.2
[5] RSelenium_1.7.1
loaded via a namespace (and not attached):
[1] Rcpp_0.12.12 XML_3.98-1.9 binman_0.1.0 assertthat_0.2.0
[5] R6_2.2.2 jsonlite_1.5 semver_0.2.0 curl_2.7
[9] tools_3.4.1 yaml_2.1.14 compiler_3.4.1 caTools_1.17.1
[13] openssl_0.9.6
最佳答案
rsDriver使用binman软件包来处理相关二进制文件的下载。硒项目在https://www.googleapis.com/storage/v1/b/selenium-release/o的JSON文件中列出其发行版
如果您尝试执行以下操作，则应该遇到相同的问题：
jsonlite::fromJSON("https://www.googleapis.com/storage/v1/b/selenium-release/o")
您可以使用以下类似的方法
mock相关的curl资助：my_new_handle <- function(...){
print("mocking")
h <- .Call(curl:::R_new_handle, PACKAGE = "curl")
curl:::handle_setopt(h, ..., ssl_verifypeer = FALSE)
h
}
testthat::with_mock(
`curl::new_handle` = my_new_handle,
{
selCommand <- httr::with_config(config(ssl_verifypeer=0L),wdman::selenium(retcommand=TRUE))
}
)