R curl::has_internet() FALSE 即使有互联网连接

使用 R 包 Eurostat 从 EuroSTAT 下载数据时出现了问题：

# Population data by NUTS3
pop_data <- subset(eurostat::get_eurostat("demo_r_pjangrp3", time_format = "num"),
                   (age == "TOTAL") & (sex == "T") & 
                   (nchar(trimws(geo)) == 5))[, c("time","geo","values")]

#Fejl i eurostat::get_eurostat("demo_r_pjangrp3", time_format = "num") : 
#  You have no internet connection, please reconnect!

搜索后，我发现它是这样的声明（在 Eurostat-package 代码中）：if (curl::has_internet() {stop("You have no inernet connection, please connnect")导致问题的原因。

但是，我可以互连并且可以例如ping www.eurostat.eu

我努力了curl::has_internet()在不同的计算机上，所有计算机都具有互联网连接。在某些情况下有效（回答 TRUE），在其他情况下则无效。

我已经与我们的 IT 部门进行了交谈，我们尝试了是否是防火墙问题。删除防火墙，并没有解决问题。

不幸的是，我对网络设置一无所知。因此，当尝试阅读curl-package 的文档时，我迷失了。

使用上述命令从 EuroSTAT 下载数据在过去至少 2 年中一直有效，对我来说问题是在 2020 年初（1 月 7 日）出现的。

希望有人可以提供帮助，因为从 EuroSTAT 下载人口数据是我/我们更多日常工作的强制性部分。

在特殊情况下curl::has_internet，您无需修改​​函数即可返回特定值。它有自己的封闭环境，从中读取指示代理连接是否存在的状态变量。您可以改为修改该状态变量。

assign("has_internet_via_proxy", TRUE, environment(curl::has_internet))

curl::has_internet()  # will always be TRUE
# [1] TRUE