R/file_name.R

Defines functions file_name

file_name <- function(level_code, boolean_canarias,scale){
  scale <- switch(scale,
                  "3m" = "3",
                  "6m" = "6m5")
  path_to <- paste("se89",scale,"admin",level_code,"a",boolean_canarias,sep="_")
}
Nuniemsis/Siane documentation built on May 21, 2019, 2:20 p.m.