initialprob.nhm function

Compute the initial probability vector from a fitted nhm model