Скачиваний:
31
Добавлен:
25.12.2019
Размер:
941 б
Скачать
function z = st(N,P_cum)
z=zeros(N,1);
z(1,1)=1;
r=rand(N,1);
n=2;
k=1;
while n~=N+1
if (k==1)&&(r(n-1,1)>=P_cum(1,1))
k=2;
z(n,1)=k;
n=n+1;
elseif (k==1)&&(r(n-1,1)<P_cum(1,1))
k=1;
z(n,1)=k;
n=n+1;
end
if (k==2)&&(r(n-1,1)>=P_cum(2,2))
k=3;
z(n,1)=k;
n=n+1;
elseif (k==2)&&(r(n-1,1)<=P_cum(2,2))
k=2;
z(n,1)=k;
n=n+1;
end
if (k==3)&&(r(n-1,1)>=P_cum(3,2))
k=3;
z(n,1)=k;
n=n+1;
elseif (k==3)&&(r(n-1,1)<P_cum(3,2))
k=2;
z(n,1)=k;
n=n+1;
end
if (k==4)&&(r(n-1,1)>=P_cum(4,3))
k=4;
z(n,1)=k;
n=n+1;
elseif (k==4)&&(r(n-1,1)<P_cum(4,3))
k=3;
z(n,1)=k;
n=n+1;
end
if (n==N)
z(n,1)=z(n-1,1);
break
end
end
x =1:N;
stairs(x,z);
end
Соседние файлы в папке Лаба 3 (Цепи Маркова и СМО)