在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