This function takes any number of test genes and a common
background set of genes and properly formats them for to pass to
runFedup gene
argument.
prepInput(setName, ...)
setName | (char) character vector naming gene vectors passed to
|
---|---|
... | (char) |
List of length n
with gene vectors corresponding to those
passed to ...
.
# Raw gene data file genesFile <- system.file("extdata", "NIHMS1587165-supplement-1587165_Sup_Tab_2.txt", package = "fedup") genes <- read.delim(genesFile, h = TRUE, as.is = TRUE) # Prepare gene vectors b <- unique(genes[, "gene"]) set1 <- unique(genes[which(genes$FASN_merge < -0.4), "gene"]) set2 <- unique(genes[which(genes$FASN_merge > 0.4), "gene"]) setName <- c("background", "negative", "positive") # Generate input list with background genes and two test set of genes geneDouble <- prepInput(setName, b, set1, set2)