# NOT RUN {
# Be careful when testing this since it involves sequence alignment
# and might produce unpredictable results in some environments
require(Biostrings)
s1 = readFASTA(system.file('protseq/P00750.fasta', package = 'BioMedR'))[[1]]
s2 = readFASTA(system.file('protseq/P10323.fasta', package = 'BioMedR'))[[1]]
seqalign = twoSeqSim(s1, s2)
summary(seqalign)
s11 = readFASTA(system.file('dnaseq/hs.fasta', package = 'BioMedR'))[[1]]
s21 = readFASTA(system.file('dnaseq/hs.fasta', package = 'BioMedR'))[[2]]
seqalign1 = twoSeqSim(s11, s21)
summary(seqalign1)
# }
Run the code above in your browser using DataLab