R/tsvDir.R

In BioHPC/iCAT: immune Cell Analysis Tool

#' List TSV files in a directory.
#'
#' @param dir String of directory.
#' @return List of *.tsv files in the directory.
#' @export
#' @examples
#' FIELD <- "vGeneName aminoAcid jGeneName"
#' listPos <- tsvDir(system.file("extdata", "Post", package="iCAT"))
#' listNeg <- tsvDir(system.file("extdata", "Pre", package="iCAT"))
tsvDir <- function (dir) {
    list.files(
      path = dir,
      recursive = TRUE,
      full.names = TRUE,
      pattern = "*.tsv"
    )
}