# NOT RUN {
## NOTE: FOLLOWING EXAMPLE NEEDS MUSCLE INSTALLED
if(check.utility("muscle")) {
##- Aligning a PDB sequence to an existing sequence alignment
##- Simple example
aln <- seqbind(c("X","C","X","X","A","G","K"),
c("C","-","A","X","G","X","X","K"))
seqaln.pair(aln, outfile = tempfile())
}
# }
Run the code above in your browser using DataLab