# NOT RUN {
m <- msa(seqs=c("A--ACGTAT", "AG-AGGTAA", "AGGAGGTAG"),
names=c("human", "mouse", "rat"))
is.ordered.msa(m)
m <- msa(seqs=c("A--ACGTAT", "AG-AGGTAA", "AGGAGGTAG"),
names=c("human", "mouse", "rat"), is.ordered=FALSE)
is.ordered.msa(m)
# }
Run the code above in your browser using DataLab