# NOT RUN {
set.seed(327)
# Computation of a DCMM model
# }
# NOT RUN {
model <- march.dcmm.construct(y=pewee,orderHC=1,orderVC=1,M=2,popSize=1,gen=1)
# Extraction of the best sequence of hidden states using the Viterbi algorithm.
bestSeq <- march.dcmm.viterbi(model)
print(bestSeq)
# }
Run the code above in your browser using DataLab