## Set file information
test_narrowPeak <- system.file("extdata",
"A549_FOSL2_ENCSR000BQO_MZW_part_chr_1_and_12.narrowPeak",
package = "consensusSeekeR")
## Read file to extract peaks and regions
data <- readNarrowPeakFile(test_narrowPeak, extractRegions = TRUE,
extractPeaks = TRUE)
## To access peak data (GRanges format)
head(data$peak)
## To access region data (GRanges format)
head(data$narrowPeak)
Run the code above in your browser using DataLab