r - 使用 R 从需要凭据的 FTP 站点下载文件

Question

我正在尝试从需要凭据的 FTP 站点下载一些 zip 文件。我能够使用 RCurl pacakge 中的 getURL 函数从站点获取文件列表。这是我使用的代码(来自对旧的 stackoverflow 问题之一的回答)。

library(RCurl)
url<-"ftp://ftp.mysite.com/EOD/"
userpwd<-"name:password"
filenames <- getURL(url, userpwd = userpwd,
                    ftp.use.epsv = FALSE,dirlistonly = TRUE)
filenames<-strsplit(filenames, "\r\n")

我尝试了几个函数(downloadFile、download.file、getURL 等)将这些文件下载到我计算机上的本地目录，但是，我不断收到以下错误 -

Error in download.file(url, destfile = pathnameT, mode = mode, quiet = !isVisible(verbose),  : 
  cannot open URL 'ftp://ftp.mysite.com/EOD/testfile_txt.zip'
In addition: Warning message:
In download.file(url, destfile = pathnameT, mode = mode, quiet = !isVisible(verbose),  :
  InternetOpenUrl failed: 'The login request was denied

在阅读了这个错误之后，我尝试了两件事——
1.在downloadFile函数中指定setInternet2(use=TRUE)；和
2. 在全局工具 > 包中取消选中“为 HTTP 使用 Internet Explorer 库/代理”。

如果有人可以帮助我使用 R 将这些压缩文件下载到本地目录，我将不胜感激。谢谢。

Answer 1

有趣的。我改变了论点 ftp.use.epsv = FALSE至 ftp.use.epsv = TRUE并且工作正常。

另一个使响应更有条理的更改:

来自 filenames<-strsplit(filenames, "\r\n")
至:filenames<-strsplit(filenames, "\n")