#ribosomal footprint data
datadir <- system.file("extdata", package = "riboSeqR")
ribofiles <- paste(datadir,
"/chlamy236_plus_deNovo_plusOnly_Index", c(17,3,5,7), sep = "")
rnafiles <- paste(datadir,
"/chlamy236_plus_deNovo_plusOnly_Index", c(10,12,14,16), sep = "")
riboDat <- readRibodata(ribofiles, rnafiles, replicates = c("WT", "WT",
"M", "M"))
lengthDist(riboDat)
Run the code above in your browser using DataLab