从网页下载所有R zip包

Question

我目前工作的组织阻止了R Studio中的CRAN存储库。因此，为了安装软件包，我需要转到http://cran.rstudio.com/bin/windows/contrib/3.6/并手动下载每一个及其依赖项并将其安装在RStudio中。它变得相当乏味。

有没有办法让我一次下载这个页面上的所有zip文件，并将它们放在桌面上的文件夹中？然后，是否有代码可以在RStudio中同时安装/加载所有zip文件包？

提前谢谢！

Answer 1

下面是一个使用包rvest的可能示例。rvest函数用于获取要下载的软件包列表。

请注意，Sys.sleep(1L)调用在下载之间暂停执行一秒钟。很明显，你可以改变或完全删除它。

library(rvest)
url <- 'https://cran.rstudio.com/bin/windows/contrib/3.6'
packages <- rvest::read_html(url) %>%
rvest::html_nodes("a") %>%
rvest::html_text() %>%
grep('.zip$', ., value = TRUE) %>%
sort()
for (pkg in packages) {
Sys.sleep(1L)
cat('Downloading', pkg, '...')
pkg_url <- file.path(url, pkg)
download.file(pkg_url, destfile = pkg, quiet = TRUE)  
cat(' DONE.n')
}