R/get_grid.R

Defines functions get_grid

get_grid <- function(filename) {
  grid_str <- substr(basename(filename), 21, 22)
  return(as.numeric(grid_str))
}

Try the cmsaf package in your browser

Any scripts or data that you put into this service are public.

cmsaf documentation built on Sept. 15, 2023, 5:06 p.m.