список файлов из https сервера, используя R - PullRequest
Новая
       24

список файлов из https сервера, используя R

0 голосов
/ 06 марта 2019

У меня проблема при попытке вывести список всех файлов с этого сервера https с помощью R ([https://oceandata.sci.gsfc.nasa.gov/MODIS-Aqua/Mapped/Monthly/4km/sst/][1])

После перечисления всех имен файлов, я хотел бы загрузить последний / самый новый файл

Кто-нибудь может мне помочь?

здесь короткий код, который я пытался использовать, но все еще не работает 

url<-'  https://oceandata.sci.gsfc.nasa.gov/MODIS-Aqua/Mapped/Monthly/4km/sst/'
f1<-getURL(url, curl = curl)
download.file('https://oceandata.sci.gsfc.nasa.gov/cgi/getfile/A20021822002212.L3m_MO_SST_sst_4km.nc', destfile = desf[length(f2)], mode = "wb")

1]: https://oceandata.sci.gsfc.nasa.gov/MODIS-Aqua/Mapped/Monthly/4km/sst/

1 Ответ

1 голос
/ 06 марта 2019

У меня работает следующее: 

library(httr)
library(XML)

df <- readHTMLTable(content(GET("https://oceandata.sci.gsfc.nasa.gov/MODIS-Aqua/Mapped/Monthly/4km/sst"), "text"))[[1]]

download.file(paste0("https://oceandata.sci.gsfc.nasa.gov/cgi/getfile/", 
    tail(df,1)$Filename), tail(df,1)$Filename, mode = "wb")
...