# NOT RUN {
## Creating a sequence object from the first 500 actcal data.
data(actcal)
actcal.seq <- seqdef(actcal[1:500,13:24])
## 10 most frequent state patterns in the data
seqtabstocc(actcal.seq)
## All state patterns
seqtabstocc(actcal.seq, idxs=0)
# }
Run the code above in your browser using DataLab