View source: R/CreateOutputDF.R
CreateOutputDF | R Documentation |
Create Output Dataframe
CreateOutputDF( keepCpGs_df, keepContiguousCpGs_df, CpGsOrdered_df, returnAllCpGs = FALSE )
keepCpGs_df |
a data frame with |
keepContiguousCpGs_df |
a data frame with |
CpGsOrdered_df |
a data frame of CpG location with |
returnAllCpGs |
indicates if outputting all the CpGs in the region when there is not a contiguous comethylated region or only the CpGs in the contiguous comethylated regions |
a data frame with CpG
= CpG name, Chr
= chromosome
number, MAPINFO
= genomic position, r_drop
= correlation
between the CpG with rest of the CpGs, keep
= indicator for
co-methylated CpG, and keep_contiguous
= contiguous comethylated
subregion number
data(betasChr22_df) CpGsChr22_char <- c( "cg02953382", "cg12419862", "cg24565820", "cg04234412", "cg04824771", "cg09033563", "cg10150615", "cg18538332", "cg20007245", "cg23131131", "cg25703541" ) CpGsOrdered_df <- OrderCpGsByLocation( CpGsChr22_char, arrayType="450k", output = "dataframe" ) betaCluster_mat <- t(betasChr22_df[CpGsOrdered_df$cpg, ]) keepCpGs_df <- MarkComethylatedCpGs(betaCluster_mat = betaCluster_mat) keepContiguousCpGs_df <- FindComethylatedRegions(CpGs_df = keepCpGs_df) CreateOutputDF(keepCpGs_df, keepContiguousCpGs_df, CpGsOrdered_df)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.