# \donttest{
windowed_shifts.filename <- system.file("extdata",
"windowed_shifts.example_data.bed", package = "PopPsiSeqR")
windowed_shifts.bg <- import.smvshift(windowed_shifts.filename)
windowedFrequencyShift.plotter(windowed_shifts.bg)
# }
Run the code above in your browser using DataLab