#See what is available 365 days before today
abbrev <- "gfsanl"
model.date <- paste0(format(Sys.time() - 24 * 60 * 60 * 365, "%Y%m%d"))
if (FALSE) {
gfs.available.models <- CheckNOMADSArchive(abbrev, model.date)
}
Run the code above in your browser using DataLab