R/wrf_download.R

In aws.wrfsmn: Data Processing of SMN Hi-Res Weather Forecast from 'AWS'

#' Download of wrf files
#'
#' @description
#' Download of WRF SMN data from AWS
#'
#' @usage wrf.download(wrf.name = wrf.name)
#'
#' @param wrf.name list of names to download from get.wrf.files. e.g.: "DATA/WRF/DET/2024/01/01/18/WRFDETAR_24H_20240101_18_000.nc"
#'
#' @import aws.s3
#' @return downloaded netcdf files
#'
#' @export
#'
wrf.download <- function(wrf.name = wrf.name){
  for (i in 1:length(wrf.name))
  {
    save_object(
      object = wrf.name[i],
      bucket = "s3://smn-ar-wrf/",
      region = "us-west-2",
      file = substring(wrf.name[i], 28),
      overwrite = TRUE)
  }
}