if (FALSE) {
Seqs <- seqinr::read.fasta(file =
"http://www.ncbi.nlm.nih.gov/WebSub/html/help/sample_files/nucleotide-sample.txt")
referFreq <- make_referFreq(cds.seq = Seqs, lncRNA.seq = Seqs, k = 6, step = 1,
alphabet = c("a", "c", "g", "t"), on.orf = TRUE,
ignore.illegal = TRUE)
}
Run the code above in your browser using DataLab