# Loading mixture hidden Markov model (mhmm object)
# of the biofam data
data("mhmm_biofam")
# Separate models for clusters
sep_hmm <- separate_mhmm(mhmm_biofam)
# Plotting the model for the first cluster
plot(sep_hmm[[1]])
Run the code above in your browser using DataLab