% Testing the teleoperator Markov chain problem
%
% Samuli Siltanen Nov 2015

% Construct the transition probability matrix
P = [...
    [0 1/2 1/3 1/6];...
    [0 1/2 1/4 1/4];...
    [1/4 1/4 1/4 1/4 ];...
    [1/10 0 0 9/10];...
    ];

% Initial market shares 
x0 = [1 0 0 0];

% Compute future situation
format long
for iii = 1:30:1000    
    disp(x0*P^iii)
end

%x1 = x0*P
%x2 = x1*P
%x3 = x2*P
