如何在 R 中下载之前确定在线文件大小？
How to determine online file size before download in R?
问题很简单，在其他语言中也有类似的问题，但据我所知，在 R 中没有。
我想下载一个R代码的文件，但是在下载之前，我想打印出下载的大小和估计的时间。
有什么方法可以直接在 base R 中或使用 curl 实用程序执行此操作？
一个简单的解决方案是：
download_size <- function(url) as.numeric(httr::HEAD(url)$headers$`content-length`)
这将允许
download_size("https://cran.r-project.org/doc/manuals/r-release/R-ints.pdf")
#> [1] 452557
问题很简单，在其他语言中也有类似的问题，但据我所知，在 R 中没有。
我想下载一个R代码的文件，但是在下载之前，我想打印出下载的大小和估计的时间。 有什么方法可以直接在 base R 中或使用 curl 实用程序执行此操作？
一个简单的解决方案是：
download_size <- function(url) as.numeric(httr::HEAD(url)$headers$`content-length`)
这将允许
download_size("https://cran.r-project.org/doc/manuals/r-release/R-ints.pdf")
#> [1] 452557