Я хочу загрузить несколько zip-файлов с FTP-сервера, защищенного паролем, но застрял.
Мой первый подход заключается в том, чтобы загрузить всего один zip-файл:
library(RCurl)
url <- "ftp://adress"
userpwd = "user:pw"
listoffiles <- getURL(url,userpwd = userpwd, dirlistonly = TRUE)
filenames <- read.csv(text = listoffiles, header = F)
filenames <- sapply(filenames, as.vector)
download.file(paste( url, filenames[1], sep="" ) , paste( "./" , filenames[1] , sep = "" ), mode="wb" )
Это приводит к бесконечной загрузке ... Я был бы признателен за вашу помощь!