clear all;

figure(6);
L=25; U=25;
plot([-L U],[0 0],'b',[0 0],[-L U],'b'); % Tegner akser
axis([0 U 0 U]);
axis manual;
grid;
hold on;

A=[0.5 0.4; -0.15 1.1]  

[P D] = eig(A)

x=[10;20];

for k=1:50
plot(x(1),x(2),'or');
pause(0.05)
x=A*x;                  % regner ut neste tilstand i systemet
end