%ejemplo del ratón

clear all;
clc;


N=10;
p=zeros(N,3);

p(1,:)=[1 0 0];
P=[0 1/2 1/2;
   1/2 0 1/2;
   1/2 1/2 0];
 
 
i=2;
for i=2:N
  p(i,:)=p(i-1,:)*P;
end;  


plot(p(:,1));