View source: R/shift_footprints_helpers.R
ribo_fft_plot | R Documentation |
Get periodogram plot per read length
ribo_fft_plot(fft_dt, period_window = c(0, 6))
fft_dt |
a data.table with read_length, amplitude and periods |
period_window |
x axis limits, default c(0,6) |
a ggplot, geom_line plot facet by read length.
## Note, this sample data is not intended to be strongly periodic.
## Real data should have a cleaner peak for x = 3 (periodicity)
# Load sample data
df <- ORFik.template.experiment()
# Load annotation
cds <- loadRegion(df, "cds", names.keep = filterTranscripts(df))
# Select a riboseq library
df <- df[df$libtype == "RFP", ]
footprints <- fimport(filepath(df[1,], "default"))
fft_dt <-ribo_fft(footprints, cds)
ribo_fft_plot(fft_dt)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.