% Rydd opp
clc
clear
format longG

% Migrasjonsmatrise, startvektor og antall steg
P = [0.7 0.4 0.3; 0.1 0.6 0.1; 0.2 0 0.6];
x = [697010; 259958; 207595];
n = 20;

% Let's go
for i=1:n
  fprintf('År: %.0f \n\n',i)
  x = P*x;
  fprintf('Oslo: %.0f \n',round(x(1)))
  fprintf('Bergen: %.0f \n',round(x(2)))
  fprintf('Trondheim: %.0f \n\n\n',round(x(3)))
  pause(2)
end