r - R パッケージ 'MSwM' の結果に一貫性がない

Question

mod.mswm <- msmFit(lm(y~x),k=2,p=1,sw=rep(T,4),control=list(maxiter=700,parallel=F)) summary(mod.mswm)

この r パッケージで一貫性のない結果が得られました。

最初の実行 -> レジーム 1 = "推定値 = 0.05"

             regime 2 = "estimate = 0.90"

2 回目の実行 -> レジーム 1 = "推定値 = 0.90"

              regime 2 = "estimate = 0.05"

私を助けてください..