_targets_cyclones.R

################################################################################
#
# General Targets Workflow
#
################################################################################

## Download targets ------------------------------------------------------------

cyclones_download_targets <- tar_plan(
  ### Get download links ----
  tar_target(
    name = cyclone_reports_links,
    command = cyclones_get_report_links(),
    cue = tar_cue("always")
  ),
  ### Download reports ----
  tar_target(
    name = cyclone_reports_download_files,
    command = cyclones_download_report(
      url_link = cyclone_reports_links,
      directory = "data-raw"
    ),
    pattern = map(cyclone_reports_links),
    format = "file"
  )
)


## Data targets ----------------------------------------------------------------
cyclones_data_targets <- tar_plan(
  ### Process cyclones peak data ----
  tar_target(
    name = cyclones_peak_data,
    command = cyclones_process_peak_data(
      path_to_report = cyclone_reports_download_files
    ),
    pattern = map(cyclone_reports_download_files)
  ),
  ### Output cyclones peak data as CSV ----
  tar_target(
    name = cyclones_peak_data_csv,
    command = {
      write.csv(
        cyclones_peak_data, file = "data/cyclones.csv", row.names = FALSE
      )
      "data/cyclones.csv"
    },
    format = "file"
  )
)


## Processing targets ----------------------------------------------------------
cyclones_processing_targets <- tar_plan(
  
)


## Analysis targets ------------------------------------------------------------
cyclones_analysis_targets <- tar_plan(
  
)


## Output targets --------------------------------------------------------------
cyclones_output_targets <- tar_plan(
  
)


## Reporting targets -----------------------------------------------------------
cycylones_report_targets <- tar_plan(
  
)


## Deploy targets --------------------------------------------------------------
cyclones_deploy_targets <- tar_plan(

)