function [ ] = stickPerson(  )
%STICKPERSON Draw a stick figure person (Stick Person).

% Vertices of Stick Person. Listed as 2-by-n matrices,
% where the first row is x coordinates and the second is y.
% This format makes it easy to multiply an entire list L of points
% by a matrix M simply by computing the expression M * L. To
% plot such a list of points, use the first row (e.g., L(1,:))
% as the x argument to "plot" and the second row (e.g., L(2,:))
% as the y argument.

legs = [ -2  -1   0;
          0  1.5  0 ];

body = [ -1    -1;
          1.5   3.2 ];

arms = [ -2.5  0.5;
          3    3 ];
     
t = linspace( 0, 2*pi, 50 );
head = [ 0.5 * cos(t) - 1;
         0.5 * sin(t) + 3.7 ];


% Draw Stick Person.

figure( 1 );
clf;

plot( legs(1,:), legs(2,:), 'k' );
hold on;
plot( body(1,:), body(2,:), 'k' );
plot( arms(1,:), arms(2,:), 'k' );
plot( head(1,:), head(2,:), 'k' );
axis equal;

end
