## Creating a sequence object from columns 13 to 24
## in the 'actcal' example data set
## Here we retain the first 10 sequences only.
data(actcal)
actcal.seq <- seqdef(actcal[1:10,13:24])
## Retrieving the DSS
actcal.dss <- seqdss(actcal.seq)
## Displaying the DSS for the first 10 sequences
actcal.dss
## Example with with.missing argument
data(ex1)
ex1.seq <- seqdef(ex1[, 1:13])
seqdss(ex1.seq)
seqdss(ex1.seq, with.missing=TRUE)
Run the code above in your browser using DataLab