如何使用 dataframe 中另一列的数据命名 R 中的文件下载？

Question

我有一个包含唯一文件 ID 和下载文件链接的大型数据集。 它看起来像这样：

file_id <- c("id:fghjs12:ws8c7/syx", "id:f7gnsfu:7a6#*s", "id:dug:shxgcvu:6sh")
link <- c("https://www.dynare.org/wp-repo/dynarewp028.pdf", "https://www.dynare.org/wp-repo/dynarewp029.pdf", "https://www.dynare.org/wp-repo/dynarewp020.pdf")
df <- data.frame(file_id, link, stringsAsFactors = FALSE)

我想使用句柄的名称下载每个文件。 一些链接已损坏。 所以我有以下循环来完成任务，但它不工作..

download_documents <- function(url, file_id) {
   tryCatch(
     {download.file(url, paste0('~/Desktop/Dataset/files/', file_id))}, 
      error = function(e) {NA},
      warning = function(w) {NA})
}
Map(download_documents, df$link, df$file_id)

有谁知道我做错了什么或有更好的解决方案？ 在此先感谢您的帮助！

Answer 1

您可以使用make.names将file_id转换为有效名称。

Map(download_documents, df$link, make.names(df$file_id))