powered by
hmm(trans.mat, eq.freq=NULL, begin.freq=NULL, end.freq=NULL)
h <- hmm(matrix(1, nrow=4, ncol=4)) h
Run the code above in your browser using DataLab