R/area_cue.R

In HoldenJe/gfsR: Compilation of R functions for use with the GFS FN data

#' area.cue
#' @description makes area cue
#' @export

area.cue <- function (NorW, fn121, fn123, psuedo=T) {
#  site.CUE<-site.cue{NorW, fn121, fn123, psuedo=T}
#  
#  if ('CUEW' %in% names(site.CUE)) {names(site.CUE$CUEW<-"CATSTAN")}
#  if ('CUE' %in% names(site.CUE)) {names(site.CUE$CUE<-"CATSTAN")}
#  
#  # aggregate site.CUE data to get an AREA CUE
#  #area.CUE<-
#  # rename output
#  name(area.CUE$CATSTAN)<-NorC
#  area.CUE
  cat('this is not done yet\n')
}