Skip to contents

Prepare quant files for tximport

Source: R/prepareTximportFiles.R
prepareTximportFiles.Rd

Prepare quant files for tximport

Usage

prepareTximportFiles(
  dir,
  type = c("salmon", "kallisto"),
  makeNames = c("makeNames", "snakeCase", "camelCase")
)

Arguments

dir

character(1). Directory path containing quant files. See tximport() for details.

type

character(1). Type of quant/abundance file to find. Expecting "quant.sf" for salmon, "abundance.h5" for kallisto.

makeNames

character(1). Syntactic name function to apply on sample names. Uses match.arg() internally.

Value

character. Return quant file paths, with valid sample names automatically applied.

Details

Runs the following internal comments:

  1. Extract sample directory name from quant file using dirname() and basename().

  2. Autopad zeros, if necessary, via autopadZeros().

  3. Sanitizes names with snakeCase().

  4. Sorts files alphabetically.

Note

Updated 2023-07-13.

See also

  • tximport vignette

Examples

suppressPackageStartupMessages({
    library(AcidBase)
})
tempdir <- tempdir2()
#> Error in vapply(X = X, FUN = FUN, FUN.VALUE = logical(1L), ..., USE.NAMES = useNames): formal argument "USE.NAMES" matched by multiple actual arguments
samples <- c("1-sample-A", "2-sample-B")
salmonDir <- initDir(file.path(tempdir, "salmon"))
#> Error in file.path(tempdir, "salmon"): cannot coerce type 'closure' to vector of type 'character'
kallistoDir <- initDir(file.path(tempdir, "kallisto"))
#> Error in file.path(tempdir, "kallisto"): cannot coerce type 'closure' to vector of type 'character'
invisible({
    lapply(X = file.path(salmonDir, samples), FUN = initDir)
    file.create(file.path(salmonDir, samples, "quant.sf"))
    lapply(X = file.path(kallistoDir, samples), FUN = initDir)
    file.create(file.path(kallistoDir, samples, "abundance.h5"))
})
#> Error in h(simpleError(msg, call)): error in evaluating the argument 'X' in selecting a method for function 'lapply': object 'salmonDir' not found
salmonFiles <- prepareTximportFiles(dir = salmonDir, type = "salmon")
#> Error: object 'salmonDir' not found
print(salmonFiles)
#> Error: object 'salmonFiles' not found
kallistoFiles <- prepareTximportFiles(dir = kallistoDir, type = "kallisto")
#> Error: object 'kallistoDir' not found
print(kallistoFiles)
#> Error: object 'kallistoFiles' not found
unlink2(tempdir)
#> Error in file.exists(x): invalid 'file' argument