if (FALSE) {
data(demo_DNA.seq)
Seqs <- demo_DNA.seq
kmer_res1 <- compute_kmer(Seqs, k = 1:5, step = 1, freq = TRUE, improved.mode = FALSE)
kmer_res2 <- compute_kmer(Seqs, k = 1:5, step = 3, freq = TRUE,
improved.mode = TRUE, on.ORF = TRUE, auto.full = TRUE)
}
Run the code above in your browser using DataLab