permTestTx: Perform permutation test

In yue-wang-biomath/RgnTX: Colocalization analysis of transcriptome elements in the presence of isoform heterogeneity and ambiguity

Perform permutation test

Description

Perform permutation test for evaluating spatial association between a feature set and a region set.

Usage

permTestTx(RS1 = NULL, RS2 = NULL, txdb = NULL, type = "mature",
ntimes = 50, ev_function_1 = overlapCountsTx, ev_function_2 = overlapCountsTx,
pval_z = FALSE, ...)

Arguments

RS1	The region set to be randomized. It should be in the GRanges or GRangesList format.
RS2	The region set to be compared with. It should be in the GRanges or GRangesList format.
txdb	A TxDb object.
type	A character object. Default is "mature". It accepts options "mature", "full", "fiveUTR", "CDS" or "threeUTR", with which one can get corresponding types of transcriptome regions.
ntimes	Randomization times.
ev_function_1	Evaluation function defines what statistic to be tested between RS1 and RS2. Default is overlapCountsTx.
ev_function_2	Evaluation function defines what statistic to be tested between each element in RSL and RS2. Default is overlapCountsTx.
pval_z	Boolean. Default is FALSE. If FALSE, the p-value is calculated based on the number of random evaluations is larger or less than the initial evaluation. If TRUE, the p-value is calculated based on a z-test.
...	Any additional parameters needed.

Details

permTestTxIA only needs users to input two region sets. It will automatically randomize the first region set into transcriptome.

Value

A list object, which is defined to be permTestTx.results class. It contains the following items:

• RSL: Randomized region sets of RS1.

• RS1: The feature set to be randomized.

• RS2: The region set to be compared with the feature set.

• orig.ev: The value of overlapping counts between RS1 and RS2.

• rand.ev: The values of overlapping counts between each element in RSL and RS2.

• pval: p-value of the test.

• zscore: Standard score of the test.

See Also

plotPermResults

Examples

library(TxDb.Hsapiens.UCSC.hg19.knownGene)
txdb <- TxDb.Hsapiens.UCSC.hg19.knownGene
exons.tx0 <- exonsBy(txdb)
trans.ids <- sample(names(exons.tx0), 500)

A <- randomizeTx(txdb, trans.ids, random_num = 100, random_length = 100)
B <- c(randomizeTx(txdb, trans.ids, random_num = 75, random_length = 100), A[1:25])

permTestTx_results <- permTestTx(A, B, txdb, ntimes = 5)

yue-wang-biomath/RgnTX documentation built on Aug. 24, 2023, 1:12 p.m.