view toolboxes/FullBNT-1.0.7/HMM/mk_rightleft_transmat.m @ 0:cc4b1211e677 tip

initial commit to HG from
Changeset:
646 (e263d8a21543) added further path and more save "camirversion.m"

function transmat = mk_rightleft_transmat(Q, p)
% MK_RIGHTLEFT_TRANSMAT Q = num states, p = prob on (i,i), 1-p on (i,i+1)
% function transmat = mk_rightleft_transmat(Q, p)

transmat = p*diag(ones(Q,1)) + (1-p)*diag(ones(Q-1,1),-1);
transmat(1,1)=1;