library(chipenrich.data)
library(chipenrich)
# Expected peak count plot for the E2F4 dataset.
data(peaks_E2F4)
plot_expected_peaks(peaks_E2F4,genome='hg19')
# Create the plot for a different locus definition
# to compare the effect.
plot_expected_peaks(peaks_E2F4,locusdef='nearest_gene',genome='hg19');
# Create the plot, but write the result to a PDF
# instead of displaying it interactively.
pdf("expected_peak_plot.pdf");
p = plot_expected_peaks(peaks_E2F4,genome='hg19');
dev.off();
Run the code above in your browser using DataLab