View source: R/util_CreateOutputDF.R
CreateOutputDF | R Documentation |
Output all the contiguous co-edited subregions found by
FindCorrelatedRegions
function and filtered by
GetMinPairwiseCor
function.
CreateOutputDF( keepSites_df, keepContiguousSites_df, keepminPairwiseCor_df, returnAllSites = FALSE, verbose = TRUE )
keepSites_df |
An output data frame from function
|
keepContiguousSites_df |
An output data frame from function
|
keepminPairwiseCor_df |
An output data frame from function
|
returnAllSites |
When no contiguous co-edited regions are found in
a input genomic region, |
verbose |
Should messages and warnings be displayed? Defaults to TRUE. |
A data frame with following columns:
site
: site ID.
chr
: chromosome number.
pos
: genomic location.
r_drop
: the correlation between RNA editing levels of
one site and the mean RNA editing levels of the rest of the sites.
keep
: indicator for co-edited sites, The sites with
keep = 1
belong to the contiguous and co-edited region.
keep_contiguous
: contiguous co-edited region number.
regionMinPairwiseCor
: the minimum pairwise correlation
between sites within a sub-region.
keep_regionMinPairwiseCor
: indicator for contiguous
co-edited subregions, The regions with keepminPairwiseCor = 1
are the ones that passed regionMinPairwiseCor
filter and will be
returned as a contiguous co-edited sub-region.
data(t_rnaedit_df) ordered_cols <- OrderSitesByLocation( sites_char = colnames(t_rnaedit_df), output = "vector" ) exm_data <- t_rnaedit_df[, ordered_cols] exm_sites <- MarkCoeditedSites( rnaEditCluster_mat = exm_data, method = "spearman" ) exm_regions <- FindCorrelatedRegions( sites_df = exm_sites, featureType = "site" ) exm_probes <- split( x = exm_regions$site, f = exm_regions$subregion ) exm_cor <- GetMinPairwiseCor( rnaEditCluster_mat = exm_data, minPairCorr = 0.1, probes_ls = exm_probes, method = "spearman" ) CreateOutputDF( keepSites_df = exm_sites, keepContiguousSites_df = exm_regions, keepminPairwiseCor_df = exm_cor$keepminPairwiseCor_df )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.