## Using the ex1 data set with sequences of different length
data(ex1)
s1 <- seqdef(ex1[,1:13])
seqlength(s1)
## sequence object s2 with a shorter 1st sequence
s2 <- s1
s2[1,8:13] <- attr(s2,"void")
seqlength(s2)
## aligning sequence lengths
seqlength.align(list(s1,s2))
Run the code above in your browser using DataLab