r i. r names(resAnchor) {#r resAnchor}R-loop forming sequences (RLFS) were compared to the ranges in r object@metadata$sampleName to measure enrichment. The resulting Z-score distribution is visualized below:
plotRLFSRes(object)
Note: for samples which map R-loop successfully, enrichment is expected. See representative examples for POS and NEG sample types here{target="_blank"}.
Additional details
RLFS were derived across the genome using QmRLFS-finder.py{target="_blank"}. R-loop broad peaks were called with macs and then compared with RLFS using permTest from the regioneR{target="_blank"} R package. An empirical distribution of RLFS was generated using the circularRandomizeRegions method and compared to the peaks in order to calculate enrichment p value and zscore (effect size of enrichment). For additional detail, please refer to the RLSeq::analyzeRLFS documentation (link{target="_blank"}).
# Wrangle data rlfs_data <- rlresult(object, resultName = "rlfsRes") pt <- rlfs_data$perTestResults pval <- pt[[1]]$pval ntimes <- pt[[1]]$ntimes zscore <- pt[[1]]$zscore lz <- rlfs_data$`Z-scores` # Set display colors rlfs_pval_color <- ifelse(pval > .05, 'red', ifelse(pval > .01, 'orange', 'green')) rlfs_zs_color <- ifelse(zscore < 5, 'red', ifelse(zscore < 15, 'orange', 'green'))
From this analysis, the empirically-determined p value was r pval (with r ntimes permutations, the minimum possible p value was r 1/(1 + ntimes)).
The enrichment z-score was r zscore.
plot(pt)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.