% plots four levels of Cantor line segments
gset key off;   % turn legend off in Octave
A = [0 0];
B = [1 1];
hold off
subplot(2,2,1)
axis('equal')
cantor(A,B,0);
subplot(2,2,2)
hold off
cantor(A,B,1);
axis('equal')
subplot(2,2,3)
hold off
cantor(A,B,2);
axis('equal')
subplot(2,2,4)
hold off
cantor(A,B,3);
axis('equal')