% Rydd opp
clc
clear
close

% Tallene fra Forelesning 7 erstattet med tall fra eksempel i Kapittel 5.5.
A = [0.5 -0.6; 0.75 1.1];

% Tre tilfeldige startvektorer.
x = [1; 0];
y = [-1/4; 1/3];
z = [1/3; 1/2];

% Koordinatsystem
axis([-2 2 -1.5 1.5])
axis equal
hold on;
plot(x(1),x(2),'.','MarkerSize', 20,'Color','b')
plot(y(1),y(2),'.','MarkerSize', 20,'Color','r')
plot(z(1),z(2),'.','MarkerSize', 20,'Color','m')
pause(5)

% Let's go
n = 60;
for i = 1:n
    x = A*x;
    y = A*y;
    z = A*z;
    plot(x(1),x(2),'.','MarkerSize', 20,'Color','b')
    plot(y(1),y(2),'.','MarkerSize', 20,'Color','r')
    plot(z(1),z(2),'.','MarkerSize', 20,'Color','m')
    pause(1)
end