R/get.file.path.R

Defines functions get.file.path

get.file.path <- function(file) {
  if(grepl("/", out)){
    gsub("^(.*/).*$", "\\1", out)
  } else {
    "./"
  }
}
cmcouto-silva/snpsel documentation built on June 8, 2021, 10:29 p.m.