问题描述
问题很简单,据我所知,其他语言也有类似的问题,但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