clear all
close all
figure ();

%% Input data
arrow_up = imread ('arrow_up.jpg'); % contains an arrow pointing upwards

%% First figure
subplot (2, 2, 1);
imshow (arrow_up);
title ('Figure 1');

%% Second figure
subplot (2, 2, 2);
imshow (arrow_up);
hold on
plot ([10, 10, 30, 30], [60, 80, 80, 60], 'o-', 'linewidth', 3, 'markersize', 5)
hold off
axis on
title ('Figure 2');

%% Third figure
subplot (2, 2, 3);
hold on
plot ([10, 10, 30, 30], [60, 80, 80, 60], 'o-', 'linewidth', 3, 'markersize', 5)
imshow (arrow_up);
hold off
axis on
title ('Figure 3');

%% Fourth plot
subplot (2, 2, 4);
plot ([10, 10, 30, 30], [60, 80, 80, 60], 'o-', 'linewidth', 3, 'markersize', 5)
hold on
imshow (arrow_up);
set (gca, 'children', flipud (get (gca, 'children')));
hold off
axis on
title ('Figure 4');
