如何使getURL在Windows 10的R上工作？ [tlsv1警报协议版本]

如何解决如何使getURL在Windows 10的R上工作？ [tlsv1警报协议版本]

显然，使用Windows 10时，getURL似乎有问题。我已经在互联网上搜索了很长时间，除了“使用[alternative]替代”之外找不到任何答案。但是，我目前正在上一堂使用预编码算法的课程，每当我用Curl替换RCurl时，一切都崩溃了，我根本不了解R（我是一个完整的初学者），所以我真的很想使用getURL而不是其他方法，因为我无法修复算法的其余部分。

例如，运行这段代码

theurl <- getURL("https://en.wikipedia.org/wikI/Opinion_polling_for_the_french_presidential_election,_2017",.opts = list(ssl.verifypeer = FALSE) )

返回错误

函数错误（类型，msg，asError = TRUE）：错误：1407742E：SSL 例程：SSL23_GET_SERVER_HELLO：tlsv1警报协议版本

接下来要执行的几行代码是

theurl <- getURL("https://en.wikipedia.org/wikI/Opinion_polling_for_the_french_presidential_election,.opts = list(ssl.verifypeer = FALSE) )
Data <- readHTMLTable(theurl,stringsAsFactors = FALSE,which=1)
Data
#regexpr(pattern="26_January_to_16_march_2017",text = theurl)

如果我使用其他替代方法，例如this question，然后要么我只更改第一行，删除getURL并使用curl而不是RCurl，但随后readHTMLTable不起作用，或者我替换了第一行和第二行，但是显然readHTMLTable和readLines不起作用同样的事情，因此算法的其余部分将失败或无法正常工作。我几乎不能用R编写代码，而正在运行的算法已经由教授该课程的教授进行了编码，所以我自己很难解决此问题

那么...有什么办法可以使此getURL正常工作，从而使我不会在学期中失败？预先感谢您的帮助。

解决方法

提前为我的英语道歉。尝试使用函数GET代替函数getURL，不要忘记添加httr库。

library(httr)
url <- "url of website" 
Data <- GET(url)
Data <- readHTMLTable(rawToChar(tabs$content),stringsAsFactors = F)

我的getURL函数也有问题